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La REVISTA de las computadoras personales que 
interesa tanto al aficionado como al profesional 


ORDENADOR 


La informática al 
alcance de todos. 


POPULAR 


COMPLETA, 
DETALLADA, DIRECTA, 
INNOVADORA... 

Una publicación 
de clara y amena 
lectura. 

Para el aficionado, para 
el profesional. 

Técnica, diversión 
y entretenimiento. 

ORDENADOR 

POPULAR 

la revista que le dá 

a conocer el hoy 
y el mañana de la 
informática. ¡Con las 
últimas novedades 
en el campo de las 
computadoras 
personales! 
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EL DESPERTAR 
DE SECOINSA 

NCR 

CONTRAATACA 
EN PERSONALES 


¡NO SE QUEDE ATRAS! 



YA ESTA A LA VENTA 


Cómprela en su kiosco habitual o solicítela a: 
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- POPULAR. 


Bravo Muríllo, 377 
Tel.7339662 
28020 MADRID 
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¿ HACKERS, LOCOS 
O POR LOS BITS 


Temidos y admirados, los hackers son 
uno de los fenómenos sociales más 
representativos de esta década. Todo 
empezó con una llamada telefónica y 
un silbido. 

14 GUIA 

I ^T DEL HAtXER _ 

Aunque la actividad favorita de los 
hackers sea comunicarse con los 
grandes ordenadores, existen otras no 
menos interesantes, como la que nos 
propone Manuel Arana. 



20 NOTICIAS 


Sinclair desmiente que la NASA vaya 
a comprar QLs para el transbordador 
espacial. 

22 JUEGOS _ 

Continua el auge de los juegos bélicos, 
como Commando y Panzadrome, y 
surgen nuevas imitaciones de 
Liltimate, como Sweevo’s World. 

O/ APRENDIENDO 
ZO CODIGO MAQUINA 

El Z-80 se asoma al exterior; todo 
sobre las sentencias de entrada y salida 
de datos. 




SUPLEMENTO QL 


La protección del software 
Cuando muchos creadores de soft para 
Spectrum ya han desistido de proteger 
sus programas, empiezan a aparecer 
complicados sistemas de protección 
para el QL. 

ICE: Iconos, ventanas y ratones 
La última moda informática llega al 
QL con ICE, un entorno operativo de 
iconos. 


P ROGRAMAS 

Para todos los gustos; aplicaciones en 
BASIC y un magnífico juego con 
gráficos tridimensionales. 



IZA a GENERADOR 
DE SONIDOS 


Gracias al AY-3-8912, el 128 de 
Sinclair suena tan bien como las 
máquinas de la competencia. 


Af) NUEVOS 

*HJ COMANDOS Da 13» 

Cuando ya conocíamos de memoria 
los comandos del Spectrum, Sinclair 
incorpora otros a su nuevo modelo. 


Zfj BASIC DESDE 
OU CODIGO MAQUINA 


De entrada parece disparatado, pero si 
alguien desea utilizar el BASIC desde 
sus programas en código máquina, 
puede hacerlo con esta pequeña rutina. 


















SERVICIO DE EJEMPLARES ATRASADOS 


Complete su colección de 

ÜMtospectrun 

A continuación le resumimos el contenido de los ejemplares 
aparecidos hasta ahora. 


Núm. 2 - 300 ptas. 

Gráficos profesionales/Desplaza- 
miento pixeJ a pixüJ/Utfttzación de ru- 
tinas/ConstruccIón de! interface 
centronics/programas de utilidad | 
para microdríve/Rutina reset en códi- \ 
go máquina/Análists del editor de ■ 
textos Tasword/lnterfaces para im- i 
presoras/Programas. 

Núm. 3 - 300 ptas. 

Novedades sonimag 1 84/Arripliando j 
el Basic/Programas para ordenar I 
programas/Gráficos con el VU-3D/ j 
Lenguaje Forth/Archivos en micro- 
ddve/Programación de un rnterface 
de impresora/Programas 

Núm. 4 - 300 ptas. 

De profesión: programador/Consola 
para el Specfrum/Connparación có¬ 
digo máquina-Basic/Análisis progra¬ 
ma contabilidad/Caiendano/Pascal/ 
Programas. 

Núm, 5 - 300 ptas. 

Floppys para Spectrum/Diseño asis¬ 
tido por ordenador/64 Caracteres 
por linea/Juego de la vida/Pascal/Así 
hacemos tas portadas/Cantrol de 
evaluaciones/Programas. 

Num. 6 - 300 ptas. 

Representación de funciones/Todos 
los caminos conducen a la RGM/Jue- 
gos/Pascal/Construcción de un lápiz 
óptico/Programas de gestión. El SITI/ 
Logo: torgugas para todos/ Interrup¬ 
ciones del Z-30/Programas 

Núm. 7 - 300 ptas. 

Del 48 al PLUS paso a paso/¿Plotter 
para Spectrum?/Juegos/Libros de 
código máquina/Lápiz óptico, Pro¬ 
gramación del montaJe/EI LOGO en 
la escuela/Pascal/Floppys para 
Spectrum/Prog ramas. 

Núm 8 - 300 ptas. 

Amplía tu memoria,., a 48 K/Arquitec- 
tura; análisis del PREYME/Juegos/ 
FOflTH Nociones básícas/Una clave, 
please/QL Magazine. Ultimas nove* 
dades, análisis de software, Lengua¬ 
jes/Aula informática con Spectrum/ 
Programas.. 

Núm 9 - 300 ptas. 

Spectrum parlanchin/Juegos/Aula 
informática con Spectrum/Análisis: 
Comercial 4/Pascal/ r Periféricos: Wa- 
fadrive/QL Magazine: EASEL lo mejor 
de PSION. Música con QL/Desplaza- 
miento Pixel a Plxel, aportación de 
lectores/Programas/Programer iJ. 

Núm + 10 * 300 ptas. 

Discos: invesdisc 200/Juegos/Dos 
programas simultaneos/Protección 
del software/Conozca extremadura, 
consulte a su ordenador/Desensam- 
blador Z-80/Sofware educativo/QL 
Magazine: novedades Informat, Hoja 
de cálculo, Ajedrez/Construya su 
propio Joystick/Pascal/programas. 


DISPONEMOS 
DE TAPAS ESPECIALES 
PARA SUS EJEMPLARES DE ZX 
{sin necesidad de encuademación) 


Núm. 11 - 300 ptas. 

Actuafidad/La otra cara del LOGO/ 
Juegos/El Spectrum habla castella- 
no/SOFTAID ayuda para Etiopía/ 
S Q,S aquí el Spectrum/Dibujar con 
lápiz óptico/QL Magazine: Procesa¬ 
dor de textos, Teclas de función pro- 
gramables/Programas. 

Núm. 12 - 300 ptas, 

Actualidad/inteligencia artificial/Lá¬ 
piz óptico dk'TRONICS/Juegos/Aná- 
lisis/Bingo/Z-80 PlO/Código máqui- 
na/Anállsis: MASTERFI LE/Progra¬ 
mas, 

Núm. 13 - 300 ptas. 

Actualidad/Discos: Discovery 1/Jue- 
gos/lnteiigencia artificial/Un nuevo 
sistema operativo/QL Magazine: Ar¬ 
chive. Cartridge doctor. Aplicaciones 
comerciales/Código máquina/Pro- 
gramas. 

Núm. 14 - 300 ptas. 

Actualidad, Spectrum 128/Cálculo 
de estructuras para ingenieros y ar- 
quitectos/HELP utilidades en micro- 
drive/Juegos/Ei microdríve ese des- 
conocidc/Código máquina/QL Ma¬ 
gazine: GRAPHIC QL. Juegos Discos 
de 720 K/Un nuevo operativo/Progra- 
mas, 

Núm. 15 - 300 pta$. 

Actualidad/Spectrum 128/Un nuevo 
operativo/Círculos redondos/Jue- 
gos/ütrlidades: BETA-BASIC/GL Ma¬ 
gazine: Introducción al SUPER BA¬ 
SIC. Nuevas utilidades/Hardware: 
Puertas lógícas/Cúdigo máquina/ 
Programas. 

Núm, 16 - 300 ptas. 

Actualldad/CInco horas con 
SCREEN$/Hardware práctico/Cál- 
culos de infinita precisión/Juegos/ 
Un nuevo operativo/QL Magazine; 
Gráficos en SUPER-BASIC. Dibujan¬ 
do con ratón Archivos con Archive 
Programa/La última batalla, Juego 
estratégico. 

Núm, 17 - 300 ptas, 

Actualidad/Gráficos interactivos/ 
Juegos/Código máquina/Un nuevo 
operativo/Trucos de programación/ 
QL Magazine: Radiografía de! QL. 
Gráficos en SUPER-BASIC/Libros/ 
Programmas. 

Núm. 18 - 300 ptas, 

Actualídad/lntroducción al C/Libros/ 
Juegos/De cinta a microcinta/Visión 
panorámica de tos microprocesado¬ 
res más comunes/QL Magazine: Go- 
py de grises. Microprocesadores 
68000, una familia numerosa/Curlo- 
seandó en la RGM/Programas. 


Para hacer su pedido, rellene este cupón MOY MISMO 
y envíelo a: 

TñllñfüfláÉIMIII Bravo Morillo, 377 

IrUII Tel. 733 96 62 - 28020 MADRID 


Ruego me envíen los siguientes ejemplares alisados de TQDGS- 

PECTRüM . ... al precio de 300 pts 

El importe lo abonaré 

□ POR CHEQUE □ CONTRA REEMBOLSO □ CON Mi TARJETA PE 
CREDiTO □ AMERICAN EXPRESS □ VISA □ INTERBANK 
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EDITORIAL 

NOS LLEGO EL CAMBIO 



Como anunciábamos el mes pasado, 
este número de Todospectrum ofre¬ 
ce numerosas novedades. Induda¬ 
blemente el lector ya habrá repara¬ 
do en una de ellas: la portada. Desde 
sus comienzos, hace año y me¬ 
dio, esta revista se distinguió por ser la única cuya 
cubierta se realizaba con un ordenador: el Spec- 
trum, como no podía ser menos. Pues bien, cum¬ 
plido sobradamente el propósito de mostrar las po¬ 
sibilidades gráficas de la máquina, creemos que ha 
llegado el momento de presentar una portada más 
elaborada y atractiva, que aporte más información 
sobre la revista. 

Además, teniendo en cuenta la lógica evolución 
de los usuarios de ordenadores Sinclair, hemos in¬ 
troducido cambios que afectan tanto al diseño 
como al contenido de los artículos. 

El plato fuerte de este número es un extenso 
trabajo sobre los hackers. 

Guiados por Manuel Arana, colaborador habi¬ 
tual de Todospectrum, nos adentramos en una de 
las actividades características de todo hacker que se 
precie: la modificación de programas. 

Y no faltan las secciones habituales de código 
máquina, lectores, actualidad, juegos y programas, 
ni artículos, como los dedicados a los nuevos co¬ 
mandos del 128 o al acceso al BASIC desde código 
máquina. 

Completa la revista el suplemento QL Magazi- 
ne, en el que se analizan dos temas de actualidad: 
la protección del software y los entornos operativos 
controlados por iconos, como el ICE. 

Invitamos a los lectores a que nos hagan saber 
su opinión sobre los cambios realizados y los que 
introduciremos próximamente. 


TODOSPECTRUM 


















LOCOS POR LQ 


Seguramente, los 
lectores de esta 
revista han visto la 
película «Juegos de 
Guerra» 11 otros del 
mismo tema. Esos 
chicos algo picaros 
y algo genios 
forman parte de una 
generación nacida 
con la proliferación 
de los 

micrordenadorcs. 

Se llaman asimismo 
haekers y se 
e m pee i na n e n j liga r 
a comunicarse con 
otros ordenadores, 
generalmente muy 
grandes. 
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E l término hacker ha empe¬ 
zado a ser conocido hace 
poco debido a la aparición 
de la película «Juegos de Gue¬ 
rra» y a la detención por el FBI 
de algunos chicos que habían 
logrado meterse en los ordena¬ 
dores del Pentágono. Pero sus 
orígenes son muy antiguos, in¬ 
cluso anteriores a la aparición 
de ordenadores personales. 

Los auténticos orígenes de los 
hackers se pueden encontrar en 
unos dispositivos denominados 
«cajas azules». La aparición de 
éstos se debió, entre otras cosas, 
a un error de concepto de la 
compañía telefónica america¬ 
na, Bell (denominada hoy 
ATT). Sobre los años cincuenta 
esta empresa realizó la planifi¬ 
cación de cómo iba a ser el fun¬ 
cionamiento futuro de toda la 
red telefónica estadounidense y 
eligió como patrón un sistema 
basado en tonos para enviar 
toda la información por la linea 
telefónica. 

Lo peor del caso es que en un 
alarde de ingenio, publicaron 
todos los datos (tipo de infor¬ 
mación, duración y frecuencia 
de tonos, etc.) en un boletín de 
difusión pública. Cuando se 
dieron cuenta de su error e in¬ 
tentaron retirarlo, era demasia¬ 
do tarde. 


El primero en descubrir ía 
utilidad de esto fue un chico 
ciego llamado Joe Engressia. 
Para no aburrirse cuando se 
quedaba solo en casa, solía lla¬ 
mar a aquellos números que te¬ 
nían instalado un con testador 
automático y silbaba canciones 
que quedaban grabadas. Pero 
una vez, haciéndolo, el contes- 

■ La película «Juegos 
de Guerra» logró 
impactaren los 
espectadores 
dando a conocer la 
realidad de los 
«hackers» 

tador se puso automáticamente 
en marcha y le dejó escuchar 
todos los mensajes grabados an¬ 
teriormente. Una rápida llama¬ 
da a la compañía telefónica des-, 
pejó sus dudas. Había silbado 
justo el tono que le indicaba al 
contestador que reprodujese los 
mensajes. Evidentemente esto 
le incitó a seguir probando y 
comentó los resultados a todos 
sus amigos. 

Poco a poco, ya en la década 
de los sesenta y principios de 
los setenta, empezaron a surgir 
grupos de personas que en un 


afán de diversión o de ahorrarse 
dinero diseñaron dispositivos 
que emitían estos tonos y que 
por tanto les permitían jugar 
con la red telefónica. Estos apa¬ 
ratos se conocían popularmen¬ 
te como cajas azules y las per¬ 
sonas que los diseñaban y usa¬ 
ban jugarían un papel muy im¬ 
portante en la aparición de los 
ordenadores personales y del 
concepto hacker, aunque el 
nombre que recibían era ligera¬ 
mente distinto, phreakers. 

Entre toda esta gente había 
dos chicos que se acababan de 
conocer y que se habían hecho 
amigos debido a la gran pro¬ 
pensión que tenían ambos por 
las bromas. Ambos se llamaban 
Steven y como el lector habrá 
adivinado, sus apellidos eran (y 
son) Jobs y Wozniak. Posterior¬ 
mente fundarían una compañía 
de ordenadores conocida como 
Apple Computer. Con los cono¬ 
cimientos de uno (Wozniak) y 
la charlatanería de otro (Jobs) 
lograron obtener cierta fama y 
hacer un buen número de ami¬ 
gos entre los phreakers de la 
época. 

Uno de los amigos que hicie¬ 
ron se llamaba John Draper y 
era ampliamente conocido por 
sus habilidades telefónicas has¬ 
ta que fue detenido por el FBI y 
condenado. Posteriormente es¬ 
cribí ria un procesador de textos 
para el Apple II y en vista de su 
relativo éxito seria contratado 
por otra compañía, pese a su 
oscuro pasado, para hacer e! 
mismo programa para un nue¬ 
vo ordenador personal. La 
compañía se llama IBM y el 
programa es el famoso Easy 
Writer. 

La fiebre de las cajas azules 
siguió basta que la Bell («Ma 
Bell» como suelen decir los es¬ 
tadounidenses) tomó acciones 
judiciales. En ese momento y 
de resultas de estas presiones, la 
fiebre phreaker empezó a decli¬ 
nar. Declive que hubiera ocul¬ 
tado toda la historia bajo una 
capa de polvo si no fuera por¬ 
que a un investigador medio 



















loco llamado Ed Roberts le dio 
por inventar un nuevo aparato 
llamado Altair 8800, que fue el 
primer ordenador personal pro¬ 
piamente dicho. 

Los primeros 
ordenadores 

Rápidamente empezó otra 
fiebre que arrastró consigo a la 
mayoría de los expertos en ca¬ 
jas azules a este nuevo campo 
todavía inexplorado. Estos pri¬ 
meros ordenadores distaban 
mucho de lo que es el ordena¬ 
dor personal de hoy en día. No 
tenían discos y la mayoría de 
las veces tampoco salida de vi¬ 
deo. Sólo unos interruptores y 
luces que permitían programar¬ 
los en lenguaje máquina. Por 
ello, mercado principal no fue¬ 
ron los negocios, sino los háb¬ 
il islas. En muchos casos eran 
construidos por los propios 
usuarios y los planos se distri¬ 
buían de un modo totalmente 
informal comuniones,y charlas. 

La gente que construía y ju¬ 
gaba con estos aparatos empezó 
a ser conocida como hackers, 
término no traducible pero que 
viene a significar «tipo que está 
grillado por los ordenadores». 
En general un hacker era una 
persona que se divertía jugando 
con un ordenador del mismo 
modo que los naturalistas se 
van al campo a ver animales. 
Muchos de los programas y em¬ 
presas famosas hoy en día sur¬ 
gieron de la unión de hackers 
para un proyecto común. 

Un ejemplo típico lo consti¬ 
tuye un chico llamado Bil Ga¬ 
tes; en unión de varios amigos 
hizo un intérprete de BASIC, lo 
que constituyó un avance im¬ 
portante. Este interprete se em¬ 
pezó a distribuir ampliamente y 
pronto fue lenguaje estándar. 
En vista del éxito Bill Gates 
fundó una compañía que se ha 
convertido en la importante 
casa de software Microsoft. 

La paciencia y tesón de este 
gente sirvió para hacer avanzar 
la tecnología hasta conseguir 


modelos más avanzados. Casas 
más o menos grandes empeza¬ 
ron a interesarse en este merca¬ 
do (Tandyu, Atari, etc.), y las 
pequeñas empezaron a crecer, 
como Apple. Todo esto condu¬ 
jo a la aparición de ordenadores 
más potentes. 

A su vez los hackers unieron 
sus nuevos conocimientos a los 
adquiridos previamente con las 
líneas telefónicas y empezaron 
a comunicarse usando un apa¬ 
rato denominado módem que 
convierte las señales eléctricas 
del ordenador en sonidos que 
pueden ser enviados por el telé¬ 
fono y viceversa. Esto era po¬ 
tenciado por la liberal legisla¬ 
ción norteamericana en mate¬ 
ria de comunicaciones que per¬ 


mitía conectar cualquier apara¬ 
to a la red si cumplía los requi¬ 
sitos básicos para no dañar la lí¬ 
nea. Rápidamente empezaron a 
surgir clubs y los denominados 
BBS (Buileíin Board Systems) 
que no eran más que ordenado¬ 
res con módems especiales que 
podían responder automática¬ 
mente al teléfono. 

Al principio los BBS eran es¬ 
tablecidos por los hackers en 
sus propios ordenadores ha¬ 
ciéndolos funcionar por la no¬ 
che (hora ideal en la que suce¬ 
den la mayor parte de las aven¬ 
turas informáticas) y el uso de 
la red telefónica se limitaba a 
comunicarse con los BBS. pero 
pronto las cosas empezaron a 
cambiar. 








Exploradores telefónicos 

En Estados Unidos y debido 
a la estructura de las compa¬ 
ñías, es bastante común que las 
empresas con grandes ordena¬ 
dores tengan estos conectados a 
la red telefónica normal para 
que los directivos y otro perso¬ 
nal puedan trabajar con ellos 
desde sus casas con un terminal 
y un modem. Esto, naturalmen¬ 
te, también posibilita que cual¬ 
quier otra persona que dispon¬ 
ga de los mismos materiales (o 
incluso mejor, un ordenador en 
vez de una terminal) pueda lla¬ 
mar al mismo número y conec¬ 
tarse. Evidentemente los orde¬ 
nadores están protegidos contra 
estos asaltantes y piden unas 
claves de acceso que son secre¬ 
tas, pero ya se sabe que todo lo 
que una persona ha protegido, 
otra lo puede desproteger, de 
modo que rápidamente mucha 
gente empezó a intentar meter¬ 
se en estos ordenadores sin per¬ 
miso. Este tipo de, accesos, pro¬ 
tagonizados por una pequeña 
minoría de! colectivo hackers, 




UNA CONVERSACION 
FICTICIA 


Uno de los principales objeti¬ 
vos de estos «bucaneros» son 
los grandes ordenadores, jugar 
con ellos es una de las aficiones 
más extendidas de esta comuni¬ 
dad y para ello se pasan horaras 
intentando traspasar las barre¬ 
ras que les impiden la entrada. 

Imaginemos que son las 12 
de la noche en el centro de 
cálculo de un gran banco. La 
mayoría de los programadores 
hace horas que se han ido a sus 
casas y sólo están las tres perso¬ 
nas encargadas de velar por el 
funcionamiento del sistema du¬ 
rante la noche. La mayoría de 
los días su trabajo se limita a 
comprobar que todo marcha 
correctamente y que los progra¬ 
mas que tienen menos priori¬ 


dad se ejecuten ahora que hay 
menos trabajo. 

Hasta ahora el trabajo se ha 
desarrollado con normalidad y 
una charla amigable se desarro¬ 
lla con el ruido de fondo de las 
unidades de disco. De pronto 
en la consola del sistema (nor¬ 
malmente una impresora con 
un teclado) aparece un mensa¬ 
je. Esto normalmente se hace 
cuando algún usuario tiene un 
problema y pide ayuda al en¬ 
cargado, pero a estas horas de la 
noche es muy extraño, por lo 
que los tres se acercan a mirar. 
El texto es escueto: 

¡HOLA???? 

(El símbolo / es uno de los 
denominados promt del sistema 
y en nuestra conversación indi¬ 


ca algo que se imprime, asimis¬ 
mo el símbolo > indica que el ! 
encargado del sistema teclea lo 
que viene a continuación.) 

La sorpresa es bastante consi¬ 
derable, este tipo de mensajes 
no es normal y menos a estas 
horas de la noche. Después de 
algunos segundos de pausa apa¬ 
rece otro. 

> HAY ALGUIEN AHI? 

Por fin el encargado del turno 
se decide a contestar y teclea 

> MSG “QUIEN ES?” 

Con MSG indica que quiere 
enviar un mensaje (lo entreco¬ 
millado) a la otra persona. 

/ SOY UN USUARIO. Y TU? 

> MSG “SOY EL ENCAR¬ 
GADO DEL SISTEMA. POR 
FAVOR INDIQUE SU 
CUENTA Y QUE HACE A 
ESTAS HORAS” 

Al cabo de algunos segundos 
en los que el terminal se queda 
silencioso, aparece la respuesta, 
























son los que han dado fama al 
nombre y han hecho que ac¬ 
tualmente se conozca como 
hacher al individuo que se in¬ 
troduce ilegalmente en otros or¬ 
denadores. Una consecuencia 
inmediata ha sido que la pala¬ 
bra haya perdido parte de su 
significado inicial para el públi¬ 
co, aunque dentro del auténtico 
grupo de entusiastas se sigue sa¬ 
biendo que un hacker es un 
loco por los ordenadores que es 
capaz de pasarse !a noche sin 
dormir (con o sin modem) con 
tal de acabar un programa por¬ 
que le apetece y no tiene por 
qué hacer nada prohibido, o de 
un modo más general, aquéllos 
que trabajan con ordenadores 
porque les gusta y no por ganar 
dinero. De todos modos el resto 
de este artículo lo dedicaremos 
a aquéllos que han alcanzado la 
fama gracias a sus exploracio¬ 
nes prohibidas y que para dife¬ 
renciar de los anteriores llama¬ 
remos «bucaneros». 

A la vista de lo interesante 
que podía ser un gran ordena- 


/ SOY JOHN DEL DEPAR¬ 
TAMENTO DE CONTABILI¬ 
DAD, CUENTA SCONTl, 
ESTAMOS HACIENDO BA¬ 
LANCE PROVISIONAL. 

Este hecho no es demasiado 
raro y ya se ha producido otras 
veces, pero en esta ocasión no 
les han avisado de que se iban a 
quedar a trabajar, por lo que 
deciden realizar una investiga¬ 
ción adicional. Uno de los ope¬ 
radores se sienta y empieza a te¬ 
clear órdenes rápidamente. La 
primera le muestra todas las 
cuentas (usuarios y procesos del 
sistema) que están activas en 
este momento. 

> PROCESOR STATUS 
/NUCLEUS0001 00:00 234 
/MEMCON 0002 01:00 103 
/TERCON 0005 02:01 21 
/BATCON 0005 03:01 32 
/SYSMGR 0020 09:02 64 
/OPER1 0025 15:02 64 
/ BATCH1 0090 45:03 128 


dor y con el sabor de lo prohibi¬ 
do en la boca, muchos hobbis- 
tas se lanzaron a hacer explora¬ 
ciones nocturnas, sin salir de 
casa, en pos de trofeos, los or¬ 
denadores de las grandes com¬ 
pañías. 

■ Steven Jobs, 
Wozniak, Ed 
Roberts, Bill Gates y 
John Draper son 
míticos nombres 
dentro de la leyenda 
de los hackers 

Durante largas horas estos 
personajes tecleaban en sus or¬ 
denadores diversas combina¬ 
ciones que les permitieran acce¬ 
der a estos sistemas, ¡y a veces 
lo conseguían! Una vez dentro 
se dedicaban a investigar cómo 
era el ordenador, qué sistema 
operativo tenía, etcétera. Tam¬ 
bién buscaban cosas interesan¬ 
tes, que en la mayoría de ios ca¬ 
sos no era la información confi¬ 
dencial de la empresa, sino pro- 



/BATCH2 0090 47:03 256 
/TEST0030 75:02512 
/ IUCONT 0070 61:03 35 
/CONT1 0070 82:02 64 
Esto les permite comprobar 
rápidamente que efectivamente 
existe una cuenta CONT1 y 
que funciona de acuerdo con 
las prioridades asignadas, pero 


gramas curiosos. También uti¬ 
lizaban estos ordenadores para 
crear con ellos BBS para el gru¬ 
po de amigos. En el apartado 
«Una conversación ficticia» po¬ 
demos ver un ejemplo típico de 
lo que sucede cuando un hacker 
entra en un ordenador después 
de derribar sus barreras. 

«Juegos de Guerra» 

El impacto se produjo hace 
dos años con la aparición de la 
película «juegos de Guerra», en 
la que el protagonista primero 
estaba a punto de provocar una 
guerra nuclear desde su casa 
(involuntariamente por supues¬ 
to) y luego lo evitaba sólo con 
sus conocimientos sobre orde¬ 
nadores. 

En estos últimos dos años ha 
sucedido gran cantidad de cosas 
que han traído el tema a la ac¬ 
tualidad. 

En primer lugar la película, 
seguida de numerosos arrestos 
por el FBI. Un ejemplo son «El 
hombre eco» (16 años), «Tres 


el otro operador se fija en algo 
muy curioso. La cuenta TEST 
se creó al instalar el sistema 
para realizar unas pruebas y 
aunque todavía existe, nadie la 
usa desde hace mucho. Además 
está consumiendo mucha me¬ 
moria y tiene una prioridad 
alta, por ¡o que decide «espiar» 
lo que hace su usuario. Se sien¬ 
ta en su terminal y teclea. 

> MONITOR STEST 
/ 

/ MONITOR SSYSMGR 
Esto muestra que el usuario 
de TEST está espiándoles a 
ellos, actitud nada normal, por 
lo que rápidamente decide 
echarle del sistema sospechan¬ 
do, y no sin razón, que es una 
persona no autorizada. 

> FORCE $TEST LOGOFF 
Pero el ordenador contesta de 

un modo sorprendente. 

/ PR1V1LEUE VIOLATION 
Indicando que no le está per- 


••• 







piedras» (15 años) y «Tío Sam» 
(17 años), todos de California, 
que con sus ordenadores logra¬ 
ron meterse en el mainframe de 
la compañía telefónica y obte¬ 
ner llamadas gratuitas a cual¬ 
quier parte del mundo. 

Otro caso curioso lo protago¬ 
nizaron cinco chicos que se lo¬ 
graron introducir en los orde¬ 
nadores de la NASA, conside¬ 
rados hasta entonces inviola¬ 
bles. 

Asimismo se han descubierto 
hechos curiosos. En Phoenix se 
descubrió a dos BBS, uno ma¬ 
nejado por un chico de 14 años 
apodado «Underworld» y otro 
por un profesor de escuela, 
«Casa divertida», la fórmula 
para hacer un explosivo quími¬ 
co. 

Aunque parece que la mayo¬ 
ría de estos «bucaneros» son jó¬ 
venes menores de 18 años, el 
retrato robot elaborado por el 
FBI Índica que los más peligro¬ 
sos tienen alrededor de 25 años, 
ambiciosos, con una posición 
de fuerza y frustrados por no 


disponer de una oportunidad 
para ejercer su talento. 

Desde entonces se producen 
casos de éstos con una rapidez 
increíble, y el Senado nortea¬ 
mericano ha tenido que poner- 

■ Perseguidos, 
acosados por la 
justicia, estos 
«locos por los 
ordenadores» 
disfrutan burlando 
los más sofisticados 
sistemas de 
vigilancia y 
protección. 

se a trabajar para sacar una le¬ 
gislación acorde, ya que como 
es habitual los hechos han so- 
prepasado a las leyes. 

Hay que decir que este tema 
no es particular de Estados 
Unidos; ya se han producido 
varios casos de chicos que se 
han metido en Prestel, la red de 
ordenadores de la compañía te¬ 


•••mitiendo realizar eso. Además, 
al cabo de unos instantes se re¬ 
cibe otro mensaje del descono¬ 
cido. 

i VENIMOS EN SON DE PAZ 
SOLO QUEREMOS HA¬ 
BLAR. 

> MSG “NO TENEIS PER¬ 
MISO PARA UTILIZAR 
ESTE ORDENADOR. DES¬ 
CONECTAROS INMEDIA¬ 
TAMENTE SI NO QUEREIS 
SER DETENIDOS”. 

/ NO SABEIS QUIENES SO¬ 
MOS NI DONDE ESTAMOS, 
ADEMAS NO PODEIS RAS¬ 
TREAR LA LLAMADA TE¬ 
LEFONICA, NO HEMOS CO¬ 
NECTADO POR LA RED 
TELEFONICA BANKLINK. 
NO NOS ENFADEIS. 

El encargado del sistema ad¬ 
quiere ciertos tintes violáceos y 
después de pronunciar algunos 
insultos irrepetibles teclea en la 
consola. 


> LOGON SYSMAX ******** 
Esta es una cuenta especial 

que permite hacer absoluta¬ 
mente todo, y su utilización es 
restringida debido a su peligro¬ 
sidad. Pero antes de que puede 
teclear algo le llega otro mensa¬ 
je. 

/ SI NOS ECHAIS LO PASA¬ 
REIS MUY MAL. 

Pero nuestro hombre hace 
caso omiso y teclea. 

> FORCE TEST, CONT1 
LOGOFF: KILL ACOUNT 
CONT1, TEST 

Antes de que el ordenador 
lleve a cabo la misión que le 
han dado de destruir esas dos 
cuentas y lo que estén hacien¬ 
do, con lo que envía a los intru¬ 
sos a la calle, les llega un último 
mensaje aterrorizante: 

/ YA NOS VAMOS, PERO 
YO QUE VOSOTROS. REVI¬ 
SARIA EL BALANCE, PUE¬ 
DE QUE ESTE MAL. 


lefónica británica de uso públi¬ 
co bajo suscripción. Muchos 
«bucaneros» se introducen en 
ella con códigos robados o des¬ 
cubiertos por el método de 
prueba y error. Ese es el caso de 
Robert Shifreen y Stephen Gold 
que fueron detenidos infragan- 
ti. Sucesos similares han pasado 
en Francia e incluso en Alema¬ 
nia. 

Lo más aterrorizante del 
tema (si se quiere decir así) es 
que la edad media de estos «bu¬ 
caneros» no se coloca en los 
veintitantos años de un ingenie¬ 
ro graduado, sino que son jóve¬ 
nes de 17, 15 o incluso 13 y 14 
años los que protagonizan las 
mayores aventuras. No obstan¬ 
te se les suele considerar poco 
formados y se les intenta formar 
su personalidad. Casos notables 
de esto lo constituyen Peter 
Leppik, que después de ser 
arrestado y puesto en libertad 
condicional, ayudó a la policía 
a solucionar un problema con 
un programador (no hacker ) 
que además era obseso sexual y 
tenía su diario grabado en un 
disco con un sistema de protec¬ 
ción especial. 

Otro caso es Bill Landreth, 
que después de ser arrestado y 
juzgado por introducirse ilegal¬ 
mente en el correo electrónico 
«GTEmail», ha publicado un 
libro donde indica medidas 
para protegerse de sus ex¬ 
congéneres. 

El Craker 

El caso de este chico es qui¬ 
zás uno de los más conocidos. 
Sus inicios fueron casi casuales, 
ya que el primer intento lo hizo 
con un modem prestado y con 
el número de teléfono de un or¬ 
denador que le había dado un 
amigo. Al conectarse el ordena¬ 
dor le pidió el nombre del usua¬ 
rio, el respondió DAN, a conti¬ 
nuación le pidió la clave de ac¬ 
ceso y volvió a darle DAN. En¬ 
tonces la máquina le dijo que 
no era válida y le rechazó. Una 
segunda prueba la realizó con 









JIN, obteniendo resultados 
idénticos. Después de esto deci¬ 
dió olvidarse del tema, pero an¬ 
tes hizo un último intento con 
LEE, cuando el ordenador le 
pidió la clave de acceso y volvió 
a teclear LEE. Su sorpresa no 
tuvo límites cuando recibió 
como respuesta el mensaje 
«CLAVE VALIDA, BIENVE¬ 
NIDO AL SISTEMA». Con 
ello empezó a introducirse en 
este mundo. Al poco tiempo 
empezó a leer los BBS y tomar 
contacto con otras personas 
que se autodenominaban hac- 
kers. En conversaciones elec¬ 
trónicas con ellos aprendió sus 
primeros rudimentos, cómo en¬ 
tran en determinados sistemas, 
cómo conseguir aumentar el 
privilegio de su cuenta (que el 
ordenador le permitía realizar 
más cosas), etc. Otro apartado 
interesante era el intercambio 
de información referente a or¬ 
denadores, números de teléfo¬ 
no, claves de acceso, etcétera. 
Naturalmente, eso no lo consi¬ 
guió de golpe. Todas estas co¬ 
municaciones se hacían por 
medio de BBS sin verse perso¬ 
nalmente y utilizando seudóni¬ 
mos, el suyo era «el cracker» y 
tuvo que ganarse primero la 
confianza de los demás propor¬ 
cionando información intere¬ 
sante de modo que todos pudie¬ 
ron ver que era de fiar. 

Poco a poco su grupo de co¬ 
nocidos empezó a crecer y em¬ 
pezó a hacer correrías con algu¬ 
nos de ellos. Cierto día, uno 
apodado «Alpha Hacker» le 
propuso crear un grupo de gen¬ 
te de fiar de modo que la infor¬ 
mación entre ellos pudiese cir¬ 
cular más libremente y con más 
seguridad. De resultas de ello 
surgió el «Inner C ir ele» grupo 
selecto de «bucaneros» con sus 
propias normas de conducta. 
En su decálogo existían normas 
muy estrictas que todos seguían 
a rajatabla, expulsando a los 
que nos las cumplían. Por 
ejemplo, tenían prohibido es¬ 
tropear cualquier información 
de un ordenador que no fuese 


suya, con loque conseguían pa¬ 
sar desapercibidos y si los des¬ 
cubrían, que el operador del sis¬ 
tema no se enfadase mucho con 
ellos. 

Este punto era importante, 
ya que las reacciones de estas 
personas encargadas de velar 
por el funcionamiento del orde¬ 
nador era diversa. 

Estos acuerdos llegaban in¬ 
cluso hasta el nivel de que el 
«Inner Circle» velaba que no se 
introdujesen otras personas en 
el sistema, liberando al opera¬ 
dor de mucho trabajo de vigi¬ 
lancia. 

Durante su largo periplo visi¬ 
tó más de 800 ordenadores a 
todo lo largo de Estados Uni¬ 
dos, conviertiéndose en uno de 
los más famosos «bucaneros». 
Su última aventura la realizó en 
la red electrónica de correo de 
la GTE. Esta es una empresa 
especializada en servicios elec¬ 
trónicos a sus clientes ya que te¬ 
nía un red de ordenadores dis¬ 
tribuida por lodo Estados Uni¬ 


dos que se podía usar mediante 
suscripción. 

Una vez que entraron en este 
sistema empezaron a descubrir 
que funcionaba de un modo 
distinto a los demás. Normal¬ 
mente no había operador del 
sistema y nuncan tenían pro¬ 
blemas para entrar. Esto hizo 
que muchos se envalentonasen 
y se tomasen confianzas increí¬ 
bles en otra situación. Dejaban 
los nombres verdaderos en si¬ 
tios visibles dentro de la memo¬ 
ria, se pasaban la dirección, etc. 
Pero la gota que colmó el vaso y 
provocó el fin de gran cantidad 
de «bucaneros» fue la carta que 
envió uno de ellos a GTE en la 
que le contaba el estado de sus 
sistemas y se ofrecía para termi¬ 
nar con ello si le contrataban. 
La GTE rápidamente tomó car¬ 
tas en el asunto y durante algún 
tiempo agentes del FBI obser¬ 
varon sus conversaciones elec¬ 
trónicas y tomaron cuidadosa¬ 
mente nota de todo lo que se 
decía. Un día llamaron a la 






puerta de su casa y le detuvie¬ 
ron a la vez que confiscaban 
todo su equipo de ordenadores 
que tenía montado. Este fue el 
fin de su historia y el de mucha 
otra gente. 


Lo que puede hacer 
un «bucanero» 

Hasta ahora hemos hablado 
mucho de la historia y de los 
sucesos de los hackers y de los 
bucaneros, pero mucha gente se 
preguntará por qué son tan pe¬ 
ligrosos. En primer lugar, exis¬ 
ten tantos tipos distintos como 
personas hay en el mundo y por 
tanto, no se pueden hacer divi¬ 
siones específicas. Unos sim¬ 
plemente curiosean en el orde¬ 
nador y luego se irán. Otros, los 
amantes del peligro, incitarán a 
los operadores del sistema para 
ver si les pueden coger. Existen 
además los que se intentan 
aprovechar en beneficio propio 
pero sin pretender hundir a 
ninguna compañía. Como el 
protagonista de «Juegos de 
Guerra» que se cambiaba las 
notas y hacia uso del teléfono 
gratis. 

Pero tos más peligrosos son 
de otros dos tipos. Los primeros 
(que más que hackers o «buca¬ 
neros» son simples ladrones) 
pretenden obtener información 
que les pueda proporcionar di¬ 
nero aun a costa de otras perso¬ 
nas, como son números de tar¬ 
jetas de crédito, etc., y por últi¬ 
mo están los que pretenden ha¬ 
cerse famosos y para ello des¬ 
truyen toda la información con¬ 
tenida en el ordenador y dejan¬ 
do un mensaje como «esto lo 
hice yo». 

Como resumen podemos de¬ 
cir que los hackers no son esos 
monstruos horribles devorado- 
res de ordenadores que nos des¬ 
criben los periódicos. Más bien 
son personas agradables que 
comparten entre sí su gran afi¬ 
ción por estas máquinas y dis¬ 
frutan programando y descu¬ 
briendo cosas nuevas. 


GUIA DEL HACKER 



¿Cómo se encuentran los POKES 
necesarios para modificar un juego? 
Analizamos un caso práctico: Gunfright. 


D esde el primer momento 
en que se ve Gunfright, es 
inevitable compararlo con 
el anterior programa de Ultíma¬ 
te Nightshade. Al igual que en 
éste, se ha utilizado la técnica 
Filmation II consiguiendo la 
misma espectacularidad en los 
gráficos y movimiento. No obs¬ 
tante, el objetivo del juego ha 
variado sustancialmente, Nues¬ 
tro héroe es un cazarrecompen- 
sas recién llegado a la ciudad 
que tiene que buscar una serie 
de pistoleros y enfrentarse con 
ellos en un duelo a muerte. Si 
consigue vencer cobrará la re¬ 
compensa y así podrá ir ama¬ 
sando una fortuna, única finali¬ 
dad del juego. 
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Mi primera partida fue un 
poco deprimente. Mientras se 
carga el programa, leo las ins¬ 
trucciones. Al acabar elijo la 
opción de teclado y empiezo a 
jugar con ideas poco claras so¬ 
bre lo que hay que hacer. Mien¬ 
tras consigo hacerme con los 
mandos, pierdo un par de vidas 
en sendos choques con los ciu¬ 
dadanos que circulan por la 
ciudad. Ya en la última vida, 
empiezo a dar vueltas por ei 
pueblo. Tras largo rato, hallo 
por casualidad un pistolero. Le 
disparo y me encuentro con é! 
en un duelo en el que antes de 
darme cuenta estoy muerto. 

En las siguientes partidas la 
situación no mejora mucho. Se 
tarda demasiado en localizar al 
pistolero y el duelo es tan rápi¬ 
do que no da tiempo a enterarse 
de cómo usar las teclas. 

Esto no podía quedar así. 
Para conseguir averiguar lo que 
hay al final de este programa te¬ 
nía dos caminos: dedicar mu¬ 
chas horas a jugar o entrar por 
la puerta de atrás y buscar to¬ 
dos los POKEs que facilitasen 
el objetivo. Evidentemente, ele¬ 
gí la segunda opción, mucho 
más apasionante. 

Instalación del monitor 

El primer paso fue instalar el 
programa en un microdrive, 
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acompañado por un buen mo¬ 
nitor, como, por ejemplo, el 
MONS3M2. En este punto 
aparecieron nuevas analogías 
con Nightshade. La protección 
es prácticamente idéntica y am¬ 
bos comienzan en la dirección 
5E00, aunque por problemas 
de espacio en memoria son car¬ 
gados en 6000. A continua¬ 
ción elegí la dirección de me* 
moria en la que iba a cargar el 
monitor. La 58000 viene bas¬ 
tante bien en esta ocasión, ya 
que es usada por el programa 
como área de trabajo para la 
construcción de los gráficos, 
con lo que podemos tener el 
monitor ahí, realizar cambios 
en el programa y luego lanzar¬ 
lo. El único inconveniente es 
que no se puede volver al moni- 


■ Por alguna extraña 
razón, el número de 
vidas iniciales es 
mayor del 
necesario 

tor, ya que es destrozado en el 
momento en que se lanza el 
programa. Por último, escribí 
un cargador que colocara todo 
el sistema en memoria. Ya esta¬ 
ba preparado para abordar el 
análisis del programa. 


El bucle principal 

Lo primero que se localiza es 
el bucle principal. No es muy 


largo, pero está lleno de llama¬ 
das a subrutinas. Curiosamen¬ 
te, un único bucle controla las 
tres fases del juego. Debe haber 
una variable que determine en 
cuál de ellas estamos. 

El primer POKE que hay que 
buscar es el de vidas infinitas. 
El procedimiento consiste en 
tratar de encontrar en qué pun¬ 
to se inicializa una variable con 
el valor 2 ó 3, las vidas iniciales 
más las que estamos utilizando, 
y después ver cuándo se decre- 
menta este dato. La asignación 
inicial de esta variable debe ha¬ 
cerse en alguna de las rutinas 
que son llamadas antes de en¬ 
trar en el bucle principal. Sin 
embargo, buscando en esta 
zona no encuentro nada. Sólo 
en una ocasión se coloca un 4 
como valor inicial de una varia¬ 
ble. Este es un dato raro y prue¬ 
bo a cambiarlo por un 5. Con el 
cambio, consigo una vida más. 
Por alguna extraña razón que 
luego descubriría, el número de 
vidas iniciales es mayor del ne¬ 
cesario. 

Buscando en qué punto se 
decrementa el número de vidas, 
encontré que en varias ocasio¬ 
nes es incrementado. Esto, en 
principio, parece indicar la po¬ 
sibilidad de conseguir vidas ex¬ 
tras, y sin embargo, no es así. 
Pruebo a anular el punto en 
que se decrementa el número 
de vidas. La primera sorpresa a! 
ponerme a jugar es que ahora 
cuento con cinco vidas. Me 
dejo matar y el número de vidas 
no disminuye. Todo parece ir 
bien. Encuentro al pistolero, le 


































disparo, me mata en el duelo y 
el programa se destruye. Algo 
ha funcionado mal. Analizando 
el programa descubro la expli¬ 
cación: al pasar del duelo rápi¬ 
do al pueblo, el número de vi¬ 
das es incrementado y luego de- 
crementado. Al haber anulado 
el punto en que se decrementa, 
el número de vidas crece ilimi¬ 
tadamente y al pasar de 5 el 
programa se hace un lío y se 
destruye. Existen dos opciones 
para solucionar el problema: 
anular todos los puntos en que 
se modifican las vidas o volver a 
inicializarlas cada vez que de¬ 
ban ser reducidas. Utilicé la úl¬ 
tima opción. 

Con esto ya se pueden jugar 
partidas infinitas sin que nos 
maten, pero sigue siendo pro¬ 
blemático encontrar al pistole¬ 
ro, sobre todo cuando descubro 
que algunos van a caballo y es 
difícil alcanzarlos. El siguiente 
objetivo es lograr saber en todo 
momento dónde está el pistole¬ 
ro y dónde estamos nosotros. 
Volvemos a la lucha' con el có¬ 
digo máquina. 

Analizando la rutina donde 
se nos da a elegir entre las dis¬ 
tintas opciones, aprendo a usar 
las subrutinas de impresión en 
pantalla. Por otro lado, el inter¬ 
ferir el bucle principal para que 


ejecute continuamente nuestra 
propia rutina no presenta de¬ 
masiados problemas. Lo único 
que queda por localizar es la di¬ 
rección en la cual se guarda 
nuestra posición dentro del 
mapa y la del pistolero. 

Dentro del principal, existe 
un bucle que se ejecuta 15 veces 
y en el que se va variando el va- 

■ La información de 
cada objeto se 
guarda en 16 bytes, 
en los que se 
codifica desde la 
pantalla en la que 
están hasta la 
velocidad 

lor del registro IX y llamando a 
una rutina distancia en función 
del dato (IX-tO). Esto corres¬ 
ponde con los quince objetos en 
movimiento que el programa 
puede controlar. La informa¬ 
ción de cada objeto se guarda 
en 16 bytes, en los que se codifi¬ 
ca el tipo de objeto, la pantalla 
en la que está, la posición den¬ 
tro de la pantalla, la dirección 
en la que se mueve, la veloci¬ 
dad, etc. Esta información pue¬ 
de referirse a los ciudadanos. 


las tres balas, el pistolero, noso¬ 
tros mismos o cualquier otra 
cosa que se pueda mover. 

Después de varias pruebas, 
logro descubrir cuáles de ios 15 
bloques son los que nos intere¬ 
san, y también que los datos de 
la pantalla en que se encuentra 
corresponden a (IX+2) e (IX+4). 
Con todo esto ya se puede escri¬ 
bir ia rutina que nos informa en 
todo momento de las posicio¬ 
nes en el mapa. 

Esto facilita bastante el con¬ 
seguir avanzar en el programa y 
enfrentarnos con los 20 pistole¬ 
ros distintos con que cuenta 
(después se van repitiendo los 
cuatro últimos). De todas for¬ 
mas, los últimos se mueven 
muy rápido y es difícil toparse 
con ellos. Además, todavía hay 
que sufrir el duelo rápido, igual 
que al principio, con grandes 
probabilidades de perder. Que¬ 
dan muchos POKEs que en¬ 
contrar. Uno bastante intere¬ 
sante es el que evita que se 
mueva el pistolero. Con este 
objetivo me vuelvo a sumergir 
en el programa. Tras una bús¬ 
queda en las rutinas que con¬ 
trolan cada uno de los objetos 
móviles, descubro una rutina 
que desplaza un objeto en fun¬ 
ción del dato que se le pasa en 
el acumulador. El primer inten- 


PROGRAMA 1 

10 LOAD "”CDDE : LOAD ""CODE : 
PAPER O: INK O: LOAD ""CODE s R 
ANDQMIZE USR 24576: PRINT AI IB, 
O;: LOAD ""CODE : LOAD ‘“'CODE 
20 POKE 23446,201: RANDOMIZE U 
SR 23424: POKE 23446,33 

30 POKE 51544,233: POKE 42355, 
O 

100 REM Comienzo de los POKEs 
100O RANDOMIZE USR 23446 


ORDENADORES 

• QL - AMSTRAD - SPECTRUM 

PROGRAMAS 

• Contabilidad QL . 20.000 ptas. 

• Nóminas QL . 25.000 ptas. 
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icro s,a 


Avda. del Mediterráneo. 7 

Tsls 251 12 oo y 251 12 03 MADRID 7 


PROGRAMA 2 

10 LET n=61440: RESTORE 
30 FOR 1=1000 TO 1140 STEP 10 
40 READ aí,as LET s=0 
50 FOR j=l TO LEN ai-l STEP 2 
60 LET d=16*ÍCÜDE ai{j)-48-7*í 
ai(j)>"9">> +CODE aiíj + l)-40-7i(a 
ií j + 1) >"9") 

70 POKE n,d: LET n=n+l: LET s= 
s+d: NEXT j 

80 IF sOa THEN PRINT "Error 
en la linea ";i: STOP 
90 NEXT i 

100 RANDOMIZE USR 61440 
1000 DATA "DD210048110G083EFF37C 
D560530F1DD2100581100G33EFF37CD5 
60530F1DD21",2881 

1O10 DATA "0060110C1B3EFF37CD56O 
530F1CD0060DD21006011O0BO3EFF37C 




















TABLA 1 

POKE 49746,54: 

Vidas infinitas 

POKE 49747,2: 


POKE 49748,0: 


POKE 43387,201: 

Todo gratis 

POKE 43927,0: 

Caballo cerca 

POKE 43168,X: 

Número de bolsas iniciales 

POKE 48528.X: 

Número de bolsas en bonos 

POKE 49772,X: 

Velocidad 

POKE 51997,X: 


POKE 47654,167: 

Pueblo desierto 

POKE 47427,0: 

Los ciudadanos no mueren 


por las balas 

POKE 47437,24: 

Se puede atropellar 

POKE 48116,24: 

Pistolero parado en duelo rá¬ 


pido 

POKE 48121,195: 

Desenfunda en seguida 

POKE 48121,33: 

No desenfunda 

POKE 51588,201: 

Las balas se clavan en la pa¬ 


red 

POKE 46570,62: 

El pistolero no se mueve por 

POKE 46571,0: 

el pueblo 

POKE 46572.0: 


POKE 47383,62: 

Los ciudadanos no se mue¬ 

POKE 47384,0: 

ven 

POKE 47385,0: 


POKE 52415,62: 

Las balas quedan colgadas en 

POKE 52416,0: 

el aire 

POKE 52417,0 


POKE 46555,24: 

El pistolero es inmortal 



D560530F1DD",3083 
1020 DATA "21B05B112B003EFF37CD5 
60530F121 Al5B36C9CDB05BAF3273A32 
158C736E921 11 ,3373 

1030 DATA "005B22E3A32Í79F011005 

B016401EDB0214C5B2291A3C300SE3A6 

7A2A720243E",2983 

1040 DATA "460801B08E213D503A7DA 

2CDC2D23A7FA2CDC2D22I7DS03ABDA2C 

DC2D23ABFA2" , 4148 

1050 DATA "CDC2D23EF7DBFE1FD27CA 
31F3B053E01320AA21F3BOCDD2100401 
1001B3EFFCD", 3279 

1 1060 DATA "C604C3BBC0CD75AB1 EOOC 
DCCD62102403E43F5CDE1ADF13CFE473 
BF62E622BF2",4352 
1070 DATA "2152C036FA2336A52336C 
0E5212A4011ED5BCDD0D4CD325CE1330 
33600283602",3273 

1080 DATA "2B36362 17BA73670E521C 


to consiste en colocar una ins¬ 
trucción RET al principio de 
una rutina. El resultado no es 
muy satisfactorio, el pistolero 
probablemente no se moverá, 
pero no lo puedo comprobar 
porque yo mismo no me puedo 
mover. La rutina es llamada 
cuatro veces en el programa y 
anulando cada una de ellas por 
separado se consiguen resulta¬ 
dos mucho mejores. La primera 
de ellas congela al pistolero, la 
segunda a los ciudadanos, la 
tercera deja las balas colgando 
en el aíre esperando a que al¬ 
guien se tropiece con ellas, y, 
por último, la cuarta llamada 
nos congela a nosotros mismos. 

Un POKE para 
los ahorradores 

Mucho antes de todo esto, 
había encontrado un POKE 
bastante útil si queremos conse¬ 
guir muchos puntos. Con él, se 
logra que todo sea gratis. Lo en¬ 
contré porque está en una ruti¬ 
na que se llama durante la ini- 
cialización del programa. Tam¬ 
bién en esa zona encontré otro 
POKE que permite controlar el 
número de bolsas de dinero que 
aparecen en la primera fase, y 
ya puesto sobre la pista busqué 
el de! resto de ios bonos. 


A4011FF5BCDD0D4CD325CE1380236C93 
E0A326CC032",35 i 3 

1090 DATA "1DC9216A4B110C5CCDD0D 

4CD325C3B083E15326CC0321DC9214DB 

73628E5210A", 2970 

1100 DATA "5011175CCDD0D4CD325CE 

13802361821F9B936CAE521 BASO11235 

CCDD0D4CD32",3772 

1110 DATA "5CE1D83621C9475649444 

15320494C494D4954414441530046544 

F444F204752",2601 

1120 DATA "4154495300454143454C4 
55241444F00444154524F50454C4D415 
200434E4F20",2096 

1130 DATA "444553454E46554E4441O 
0AFDBFE2FE6iF20F83E7FDBFE2FE61F2 
80811605CCD",3397 
1140 DATA "D3D437C93EFDDBFE2FE61 
F28E6115C5CCD9BAAA7C920534900204 
E4F00".3521 
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Otra rutina interesante para 
nuestros POKEs, que fue des¬ 
cubierta por casualidad, es la 
que controla si un objeto está 
cerca de nosotros (o por lo me¬ 
nos eso creo que hace). Anulán¬ 
dola, conseguí que la ciudad es¬ 
tuviera desierta; nos quedamos 
a solas con el pistolero, pero no 
somos inmortales frente a él, 
como cabría esperar. 

El control de la velocidad a la 
que nos movemos lo lleva una 
variable que es modificada tres 
veces en el programa: la prime¬ 
ra cuando empieza la partida, 
la segunda cuando cogemos un 
caballo y la última cuando lo 
dejamos. Los valores normales 
son OA cuando vamos a pie y 
12 a caballo. Sin embargo, po¬ 
demos darle cualquier otro va¬ 
lor, aunque los superiores a 17 
harán que seamos tan rápidos 
que atravesaremos las paredes 
sin enterarnos, con lo que aca¬ 
baremos saliéndonos del mapa, 
lo que provocará una progresi¬ 
va degeneración de los gráficos 
que acabará por destruir total¬ 
mente el programa. 

El otro punto del programa 
se diferencia si vamos a pie o a 
caballo, para saber si al atrope- 
llar a alguien perdemos la vida 


■ EJ control de la 
velocidad lo lleva 
una variable que es 
modificada tres 
veces en el 
programa 


o es él quien la pierde. PO- 
KEando aquí, conseguiremos 
sobrevivir siempre a los encon¬ 
tronazos. 

Por último, queda el proble¬ 
ma del duelo rápido. La forma 
de localizar los POKEs fue a 
través de las variables que con¬ 
trolan en qué fase del programa 
estamos. Una vez localizada la 
rutina de movimiento del pisto¬ 
lero, vi que realizaba un test de 



PROGRAMA 3 


10 OLEAR 25000: LET n=25025: R 
ESTGRE 

30 FOR i=1000 TO 1130 STEP 10 
40 READ a* 

50 FOR j=l TO LEN a*-l STEP 2 
60 LET d=16*<C0DE a$(j>-48-7*( 
a* < j>>"9" > )+CODE a$ (j + 1 ) -48-7* < a 
*(j + l) >"9"> 

70 POKE n,d: LET n=n+l: NEXT j 
90 NEXT i 

100 SAVE "MAPA"CGDE 25025,224: 
STOP 

1000 DATA "O1000B000001010101010 
10101010101 " 

1010 DATA "010002111901010101010 
10101010101 " 

1020 DATA "O10000000001010101OIO 
10101010101 " 

1030 DATA "01OCOACO100101010101O 
10101010101 " 


1040 DATA “OlOlOlOlOlOlOlOlOlOlO 
10101010101 

1050 DATA "010101010101010101010 
10101010101 “ 

1060 DATA "010101010101010101010 
101Q1010101" 

1070 DATA "010101010101010101010 
10101010101 " 

1080 DATA "GIOIOIQIQIOIOIOIOIOIO 
10101010101 " 

1090 DATA "010101010101010101010 
10101010101 " 

1100 DATA "010101010101010101010 
10101010101" 

1110 DATA "01O101010101010101OÍO 
10101010101" 

1120 DATA "010101010101010101010 
10101010101 " 

1130 DATA "OIOIOIOIOIOIOIOIOIQIO 
10101010101 " 
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Mapa Origina! 
Codificación de 
Patita fias y nuevo 
mapa del haeker. 


dos de sus parámetros y des¬ 
pués un salto condicional. Sólo 
había que probar para qué ser¬ 
vía ese salto. El primer intento 
consistió en hacer que fuese in¬ 
condicional. De esta forma el 
pistolero desenfunda en el mis¬ 
mo momento en que se encuen¬ 
tra frente a nosotros. Resulta 
curioso como entrenamiento. 
Lo siguiente era anular el salto, 
y con esto se consigue que el 
pistolero no desenfunde nunca, 
únicamente se mueve. 

Todos estos POKEs los te¬ 
néis en la tabla 1. Para utilizar¬ 
los tenéis que teclear el progra¬ 
ma 1 introduciendo entre las lí¬ 
neas 100 y 1000 los POKEs que 
queráis. El programa 2 es un 
cargador en el que se han in¬ 
cluido los POKEs más útiles, la 
rutina que nos da nuestra posi¬ 
ción y del pistolero, y tres teclas 
que nos permiten distintas op¬ 
ciones: 

1. Aborta la partida, 

2. Mata al pistolero aunque 
no esté en la pantalla. 

3. Saca una copia de panta¬ 
lla en casete. 

Las copias de pantalla se sa¬ 
can sin cabecera, para no alar¬ 
gar el programa. Para cargarlas 
se utiliza la cabecera de cual¬ 
quier pantalla. 


El mapa 

Sólo queda por comentar la 
forma en que logré encontrar el 
mapa y cómo está codificado. 
Durante la búsqueda de los PO- 
KE’s no había encontrado nin¬ 
guna referencia a él. Pensando 
en el parecido con Nightshade 
intenté buscarlo en la misma 
dirección, pero no estaba allí. 
Sería demasiado fácil. Sin em¬ 
bargo, sí estaba codificado de la 
misma forma, y eso fue lo que 
me dio pie para encontrarlo. El 
mapa está almacenado por co¬ 
lumnas, con un byte por panta¬ 
lla que se puede codificar de va¬ 


rias formas, esto no es así, pues¬ 
to que los gráficos siempre son 
distintos. El total hay 16*16 
pantallas, pero las filas y co¬ 
lumnas primera y última están 
llenas de 01 para marcar los lí¬ 
mites del mapa, con lo que que¬ 
da reducido a 14*14. Una vez 
descubierto esto, introducir un 
nuevo mapa no presenta dema¬ 
siados problemas. El programa 
3 es un ejemplo de ello. Cada lí¬ 
nea de DATAs representa una 


columna del mapa (quitando la 
primera y última). Para intro¬ 
ducir el mapa, ejecuta el pro¬ 
grama 3 y guarda en una cinta 
el código resultante. Luego car¬ 
ga el programa 1 y pone en la 
zona de POKEs la línea LOAD 
“MAPA’* CODE. Por último, 
carga el programa y después el 
mapa. El de este ejemplo 
se ha hecho de 4*4 para que sea 
más fácil encontrar al pistolero. 

Manuel Alana 






















































































CP/M PARA 


SPECTRUM 


Timex Portugal se dispone a 
lanzar próximamente un 
completo sistema de disco 
destinado al Spectrum. 
Constituido por dos drives 
para discos de 3 pulgadas 
(formato utilizado por 
Amstrad), un microprocesador 
Z-80 y dos ports de impresora, 
incluye el conocido sistema 
operativo CP/M. 

Los proyectos de Timex no 
acaban ahí, pues tienen 
prevista la comercialización de 
un teclado profesional que, 
conectado a la unidad de 
discos, reemplaza al Spectrum 
y convierte-ai conjunto en un 
nuevo ordenador. 

Como comentábamos el mes 
pasado, Sinclair también está 
trabajando para incorporar 
CP/M al Spectrum, aunque 
afirma que no estará 
disponible hasta el 
lanzamiento de su ordenador 
portátil. 


' * 




Sinclair vende la 
televisión de bolsillo 
a Timex 


Los derechos de 
comercialización y 
distribución de la 
televisión de bolsillo de 
Sinclair han sido 
adquiridos por Timex, 


empresa que se encargó 
de su construcción desde 
el momento de su 
lanzamiento. 

No obstante, Sinclair 
Research continuará 
investigando en su 
cuartel general de 
Cambridge la tecnología 
de la pantalla 
plana. 


Challenger: 
la NASA sustituirá 
sus ordenadores 
en 1987 


Los ordenadores que 
controlan la lanzadera 
espacial, construidos 
por IBM a mediados de 
los 70, han quedado 
desfasados en 
comparación con los 
actuales. 

Para aumentar la 
seguridad del 
transbordador espacial, 
cuatro de las cinco 
máquinas de a bordo 
trabajan en un sistema 
operativo de IBM, 
mientras la quinta 
utiliza un sistema con 
las mismas 
especificaciones pero 
escrito por otra empresa. 






























Durante 1985, Sinclair se man¬ 
tuvo como líder indiscutible del 
mercado británicc 
res domésticos, con 

je del 37 por 100 sobre_„_ 

ventas. Por debajo se encuentran 
r ommodore, Amstrad y Acorn, 
j'jn cifras muy inferiores. 


Club de 
usuarios de QL 

A finales del pasado año se 
constituyó en Zaragoza el «Club 
español independiente de 
usuarios del QL» (QLA VE), con 
el propósito de servir como 
medio de unión, información y 
comunicación de los usuarios de 
QL españólese 
hispano-hablantes. Quienes 
estén interesados en ponerse en 
contacto con QLAVE pueden 
dirigirse a: 

Serafín Olcoz Yanguas 
Baltasar Gracián, 21,1 Cto. 
50005 Zaragoza 
También en Madrid existen 
iniciativas encaminadas a la 
creación de un club de usuarios 
de QL del que esperamos poder 
ofrecer más información en 
próximos números. 


¿Qué pasa con 
el Atari 520 ST? 


Nunca una máquina con unas 
críticas iniciales tan 
favorables ha pasado tan 
desapercibida como el Atan 
520 ST En nuestro país 
apenas se ha oído hablar de 
él tras sus breves apariciones 
en el Sonimag y el SIMO. 
Tampoco fnvestrónica, su 
distribuidor oficial, hace 
demasiado para darlo a 
conocer 

De los dos programas que en 
principio estaba previsto 
entregar junto a la máquina, 
Gem Write y Gern Draw, 
nunca más se supo. Al 
parecer, han sido sustituidos 
por First Word, un procesador 
de textos de GST (empresa 



que ha realizado algunos 
programas para el QL) y DB 
Máster One, base de datos de 
DB Máster. 

El sistema operativo TOS y el 
GEM, que, según el fabricante 
se incluirían en memoria 
ROM. se sigue entregando en 


diskette y ol parecer todavía 
con abundantes bugs. 

El problema que afecta al 520 
ST parece el mismo que 
estuvo a punto de acabar con 
el QL hace apenas unos años, 
lanzamiento prematuro y 
escasez de software. 





















la empresa que lo distribuye en Es¬ 
paña. 

Si te encuentras preparado para 
tu bautismo de fuego, ¡suerte en el 
combate! y... ¡al ataque! 


SWEEVD'S 

WORLD 

GARGOYLE GAMES 
SPECTRUM 48 K 


COMMANDO 

ZAFIRO 


SPECTRUM 48 K 


Aunque el tema no es original, 
pues el cine lo ha explotado ya 
hasta la saciedad en películas 
como Rambo, Acorralado y el 


mismísimo Comando, el juego es 
sencillamente sensacional. Quien 
coja el joystick y se siente frente al 
televisor comprenderá rápidamen¬ 
te el alcance de esta afirmación 
cuando se dé cuenta de las horas 
que Commando le ha enganchado 
a su silla. 

Sus gráficos, color, movimiento 
y sonido aprovechan al máximo 
las características del Spectrum, 
logrando importantes cotas de 
adicción al colocarte continuamen¬ 
te en situaciones límites. Sólo tu ha¬ 
bilidad y destreza en el manejo del 
joystick conseguirán sacarte de 
apuros durante los enfrentamien¬ 
tos con las fuerzas enemigas. 

Para completar la misión cuen¬ 
tas con un fusil ametrallador y 
bombas de mano, de gran utilidad 
frente a los enemigos parapetados 
en trincheras y los vehículos blin¬ 
dados. Las balas a tu disposición 
son ilimitadas, pero no así las gra¬ 
nadas, por lo que tendrás que reco¬ 
ger las qué encuentres en el cami¬ 
no, procurando no quedarte en 
ningún momento sin ellas. 

En la línea de los clásicos juegos 
de arcade, en los que todo es ac¬ 
ción, Commando es indudable¬ 
mente uno de los mejores progra¬ 
mas de Elite y también de Zafiro, 


Conocida por sus brillantes jue¬ 
gos de aventuras, como Tir Na 
Nog, Dun Darach y Marsport, 
Gargoyle Games entra en el terre¬ 
no de los juegos de arcade con 
Sweevo’s World. 

Caracterizado por una imagina¬ 
ción sin límites en cuanto a las si¬ 
tuaciones y personajes que apare¬ 
cen en la pantalla, los gráficos tri¬ 
dimensionales y la animación de 
Sweevo’s World son muy pareci¬ 
dos a los Knight Lore y otros pro¬ 
gramas de Ultímate realizados con 
la técnica Filmation. 

El protagonista de la historia, el 
robot Sweevo, ha de viajar por los 
cuatro mundos que componen el 
juego recogiendo diversos objetos. 
Aunque en la pantalla de carga 
aparece la imagen de Stan Laurel 
«el flaco», Sweevo no se parece de- 
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masiado al famoso actor cómico 
americano, sino más bien a ET. 

Existen cuatro puntos de partida 
para la aventura, seleccionables 
por el jugador, que corresponden a 
otros tantos mundos diferentes: 
Totalmente Libre, Pino Solitario, 
Dedos y Tarta de Manzana, a ios 
que se llega tras un descenso en pa¬ 
raguas. A partir de ese instante, vi¬ 
viremos las situaciones más sor¬ 
prendentes que podamos imagi¬ 
nar, Las numerosas pantallas que 
forman eí juego hacen imprescin¬ 
dible la utilización de un buen 
mapa. 

Comparable a los mejores juegos 
de Ultímate, Sweevo’s World es un 
magnífico programa que desgra¬ 
ciadamente, al menos que nosotros 
sepamos, todavía nadie distribuye 
en España. 


Cuide su Spectrum 


I 



Proteja su ordenador y manténgalo 
como nuevo con esta práctica 
funda de teclado transparente 


Servicio 
especial 
para nuestros 
lectores 
y amigos 


950p* as< 


RECORTE Y ENVIE HOY MISMO ESTE CUPON A; 
PUBLlNFORM ATICA, C/BRAVO MORILLO, 377 5. 2 A 2BQ20 MADRID 


CUPON DE PEDIDO 


SI envíeme al precio de 950 Pías cada una funda* para mi SPECTRUM 

El importe lo abonare Con mi tarjeta de crédito □ American Express □ 
Visa □ interbank O 

Contra reembolso □ Adjunto Cheque O 

Numero de mi tarjeta__ _ _ _ 

Fectia de caducidad______ 


NOMBRE __ 

DIRECCION _ 

CIUDAD „_ 

PROVINCIA „ 


C.P 


Sm g asi os de envío 


J 
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SGRIZAM 

DINAMIC 


SPECTRUM 48 K 


Dinamic nos presenta SGRI- 
ZAM, una increíble aventura futu¬ 
rista que nos traslada al siglo 
XXV. En ella tenemos dos grandes 
objetivos que alcanzar: el primero 
recuperar las riquezas del palacio 
imperial que fueron robadas por 
los guerras del planeta Kindos y el 
segundo rescatar a la joven prince¬ 
sa Doxaphin. Si conseguimos los 
dos objetivos, el Emperador nos ha 
prometido la mano de la princesa 
y la mitad del tesoro robado. Sólo 
disponemos de tres vidas y la me¬ 
jor espada del imperio, SGRI- 
ZAM. 

Nuestro guerrero se adentrará en 
el castillo de los Kindos, donde de¬ 
berá esquivar toda clase de anima¬ 
les y objetos que se interpongan en 
su camino, ya sea saltando sobre 
ellos o agachándose. También en¬ 
contrará guerreros guardando el 
castillo, así que tendrá que comba¬ 
tir contra ellos utilizando la gran 


espada. Cuando haya recorrido 
una parte del largo pasadizo, pasa¬ 
rá a la fase siguiente. La dificultad 
aumenta con las diferentes frases y, 
especialmente al alcanzar el pri¬ 
mer objetivo. 

Los gráficos son sin duda la 
principal atracción del juego, aun¬ 
que no dan demasiada importan¬ 
cia al decorado y se centran princi¬ 
palmente en la definición de los 


guerreros. Los movimientos son 
muy elementales. 


FANZADROME 

ARIOLA SOFT 
SPECTRUM 48 K 


Conducir un tanque indudable¬ 
mente no es tarea fácil, y la cosa se 
complica aún más cuando debes 
enfrentarte en el laberinto de la 
ciudad con una nutrida muestra de 
elementos bélicos que acosan, ata¬ 
can y destruyen tu vehículo. 

Baterías de artillería disparando 
a mansalva, tanques apareciendo 
por todas las direcciones y calles 
estrechas son las mayores dificul¬ 
tades que podemos encontramos. 

El juego comienza con una pan¬ 
talla de presentación curiosa, pero 
nada brillante, donde se muestran 
las distintas partes del vehículo y 
el armamento que posee como do¬ 
tación. 

Con este armamento, tendrás 
que enfrentarte a las dificultades 
ya mencionadas, partiendo desde 
tu base. 
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Mucho cuidado con los disparos varas que si te disparan y no acier- 
enemigos en tu recorrido. Obser- tan, producen una explosión en el 


suelo por donde no es posible pa¬ 
sar, pudiendo en ocasiones quedar 
cercados. 

Desde un punto de vista técnico, 
si bien los gráficos de la ciudad y el 
movimiento son dignos, no apor¬ 
tan nada extraordinario al software 
que existe en el momento, quedán¬ 
dose por debajo del refinamiento 
de los programas actuales, tanto 
bélicos como laberínticos, donde 
las tres dimensiones son condición 
necesaria en un programa de cali¬ 
dad, hecho que en este caso no se 
produce. 

Tampoco el sonido es fuerte, así 
como deja bastante que desear la 
presentación e instrucciones adi¬ 
cionales, que por descontado se 
encuentran en inglés, todo un de¬ 
talle ahora que por fin «somos eu¬ 
ropeos». 

En resumen un programa, nor- 
malito cuyo adjetivo más apropia¬ 
do sería el de vulgar. 
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LENGUA 



n microprocesador que 
no sea capaz de comuni¬ 
carse con el exterior es 
como un campanario sin 
cigüeña: no tiene razón 
de ser. ¿De qué nos ser¬ 
viría un ordenador sin 
teclado, sin monitor, sin 
altavoz y sin sistemas de almace¬ 
namiento de datos? Evidentemen¬ 
te para nada. Es por ello por lo que 
todos los procesadores tienen re¬ 
servado algún espacio de direccio¬ 
nes para dispositivos de entrada y 
salida. Pero, si las 64 K que es ca¬ 
paz de direccionar el Z-80 son uti¬ 
lizadas en su totalidad (al menos 
en el 48K) entre ROM y RAM, 
¿cómo se las arregla el Spectrum 
para funcionar? 

Existe una pista en el bus de 
control (IORQ) que indica cuándo 
el microprocesador está realizando 
una operación de entrada y salida 
y cuándo no. Por lo tanto, cuando 
IORQ esté activado, podremos dis¬ 
poner del bus de direcciones, es 
decir, de 64 K extras, para dedicar¬ 
las exclusivamente a entradas y sa¬ 
lidas. 

En lugar de asignar a cada dispo¬ 
sitivo una o varias di¬ 
recciones, para 
mayor versa¬ 
tilidad del 


sistema, en el Spectrum cada bit de 
una dirección indica si un disposi¬ 
tivo está seleccionado (valor 0) o 
no (valor I). 

Así, el bit 0 de una dirección in¬ 
dica si se utiliza la ULA, el 2 si la 
ZX-Printer, y el 3 y el 4 si el Inter- 
face 1 y los microdrives. Como po¬ 
demos ver quedan los bits 1 y 5-15 
para otros periféricos, aunque, en 
lo que atañe a entradas, los bits 
8-15, es decir, el byte más signifi¬ 
cativo, se utilizan para el teclado 
como se explica más adelante. 


Los INs y los OUTs 

Existen dos instrucciones del en¬ 
samblador (también presentes en 
el BASIC), que se encargan de 
efectuar entradas y salidas. Equi¬ 
valen a PEEK y POKE, sólo que 
activan IOQR, por lo que el dato 
que «leamos» o «escribamos» no 
irá/vendrá a/de memoria, sino 
a/de el dispositivo que correspon¬ 
de a la dirección seleccionada o 
port. 

La sintaxis es la siguiente: 

IN A, (n) lee en el acumulador el 
port direccionado por el propio va¬ 
lor de A como byte alto y el núme¬ 
ro n como byte bajo. 

IN r, (C) lee en r (= A, B, C, D, E, 
Ho L) el port direccionado por BC. 

OUT (n), A saca el número n 
por el port direccionado bor A 
como byte alto y n como byte bajo. 

OUT (C), r saca el valor de r (- 
A, B, C, D, E, H o L) por el port di¬ 
reccionado por BC. 

Al igual que con las instruccio- 
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nes de carga y comparación, exis¬ 
ten instrucciones de entrada y sali¬ 
da que incrementan o decremen- 
tan y repiten. 

INI, en assembler, no es ninguna 
agrupación de industrias en malas 
condiciones, sino una instrucción 
que lee en la posición de memoria 
direccionada por HL el port direc- 
cionado por BC, incrementa HL y 
decrementa B. INIR realiza un INI 
pero lo repite hasta que B valga 
cero. Similares a las anteriores, 
IND e INDR, en lugar de incre¬ 
mentar, decrementan el par HL. 

OUTI saca por el port direccio- 
nado por BC el valor de la posición 
a la que apunta HL, incrementa 
HL y decrementa B. OTÍR repite 
hasta que B sea igual a cero. 
OUTD y OTDR igual, pero decre- 
mentando HL. 

Como vemos, estas últimas ins¬ 
trucciones modifican el byte de 
mayor peso a medida que ejecutan, 
por lo que sólo son útiles cuando 
éste no es utilizado. INIR y OTIR 
son usadas, por ejemplo, para efec¬ 
tuar la lectura y escritura de los 
sectores en los microdrives. 


La ULA, un ayudante eficaz 

La ULA es un chip diseñado es¬ 
pecialmente para ayudar al Z-80 
en tareas específicas del Spectrum. 
Controla, por tanto, todas las en¬ 
tradas y salidas que puede efectuar 
un Spectrum standard sin otros in¬ 
terfaces. 

La ULA se comporta de distinta 
forma según la utilicemos como 


dispositivo de entrada o de salida. 
En todo caso, para seleccionarla, el 
valor que la direccione tendrá que 
tener a cero el bit 0. 

Como dispositivo de salida, con¬ 
trola el color del borde (bits 0-2), la 
toma MIC (bit 3) y el altavoz (bit 
4). Los bits 5-15 no son utilizados 
en este caso. La dirección que ha¬ 
bremos de usar para estos disposi¬ 
tivos es la 254 o 11111110 bin (es 
indiferente el valor del byte más 
significativo). 

Por ejemplo, OUT (254), A, 
siendo A igual a 2, pondrá rojo el 
color del borde, aunque si no ac¬ 
tuamos sobre la respectiva variable 
del sistema volverá a su estado ini¬ 
cial en cuanto ejecutemos alguna 
operación del BASIC que le afecte. 

La Figura 1 muestra el listado de 
una rutina que cambia el color del 
borde a gran velocidad y testea, 
mediante la subrutina de la ROM 
BREAK-KEY (lF54hex), si 
BREAR está siendo pulsado, para 
volver al BASIC sólo en ese caso. 
La velocidad a que cambia de co¬ 
lor es tal que el ojo humano no es 
capaz de seguirlo, por lo que el re¬ 
sultado es un borde multicolor y 
estático. Precisamente para que las 
líneas no suban o bajen se han in¬ 
cluido las instrucciones DI y El, 
que prohíben las interrupciones 
durante la ejecución de la rutina. 
Esto no será suficiente si coloca¬ 
mos la rutina en las primeras 16K 
de RAM, por lo que los usuarios 
de Spectrum 16K observarán bas¬ 
tante movimiento mientras la eje¬ 
cutan. La forma en que actúan las 
interrupciones será estudiada más 
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externamente en capítulos poste 
riores. 


del sonido). Si nos limitamos a ac¬ 
tivarlo durante un período deter¬ 
minado de tiempo no conseguire¬ 
mos más que un inaudible «elick». 
Hay que tener cuidado de lo que 
hacemos con los bits 0-2, pues, si 
no usamos los valores apropiados, 
el color del borde cambiará a dúo 
con el altavoz. 

La Figura 2 muestra el listado de 
una rutina que hace sonar el alta¬ 
voz de forma muy distinta al cono¬ 
cido BEEP del BASIC. Lo que 
hace especial al sonido generado 
por esta rutina es que la frecuencia 
va modificándose a medida que se 
ejecuta, por lo que el resultado es 
algo parecido a una sirena. Se pue¬ 
de variar la longitud y característi¬ 
cas del sonido modificando el va¬ 
lor de H en la línea 70; un número 
impar dará un sonido más estri¬ 
dente. 

Obsérvese cómo esta rutina, me¬ 
diante RRCA, toma de la variable 
del sistema BORDCR (23624) el 
color actual del borde para que no 


sea modificado. También usa 
XOR 16 para poner a 1 el bit 4 si 
estaba a 0 y ponerlo a 0 si estaba a 
1 (el qué hacen y cómo se usan las 
instrucciones RRCA y XOR lo de¬ 
jaremos para el capítulo siguiente, 
en el que veremos todas las ins¬ 
trucciones lógicas y de rotación). 
Como la rutina de la Fig. 1, prohí¬ 
be las interrupciones con DI al co¬ 
mienzo y las vuelve a permitir con 
El antes de la vuelta al BASIC, 
esto es necesario para que el soni¬ 
do sea puro, si no lo hiciéramos, 
las interrupciones de la ULA crea¬ 
rían un zumbido de fondo de 50Hz 
que echaría todo por tierra (esto 
sucederá también si ubicamos la 
rutina en las primeras 16K. de 
RAM). 

Si nos conformamos con hacer 
pitidos oficiales Sinclair, podemos 
recurrir a la subrutina de la ROM 
8EEPER, localizada en 03B5hex y 
a la que podremos pasarle en el par 
DE el producto de la frecuencia 
del sonido (en Hz) con su duración 


Haciendo ruido 


Para hacer sonarel sencillo alta¬ 
voz del Speclrum habremos de ha¬ 
cer un OUT a 254, activando y de¬ 
sactivando su bit 4 a gran veloci¬ 
dad (de ésta depende la frecuencia 
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(en segs), y en HL el número de es¬ 
tados temporales del bucle de re¬ 
tardo dividido entre 4. Este es igual 
a la frecueneia/2 por la velocidad 
de reloj (en el Spectrum 3.5 MHz). 
Esta rutina, por estar en ROM, sí 
puede ser utilizada por los usua¬ 
rios del 16K, 

Usada como dispositivo de en¬ 
trada, la ULA controla el teclado y 
la toma EAR, Esta última es selec¬ 
cionada por el bit 6 de la dirección 
del port. En cuanto al teclado, usa 
los bits 8-15. 


El teclado, 
otro periférico 

Debemos ver el teclado del 
Spectrum como una malla en la 
que se cruzan las pistas del byte 
alto del bus de direcciones con las 
correspondientes a los bits 0-4 del 
bus de datos (ver Fig. 3). En los 
puntos de cruce hay un interruptor 
que corresponde a cada una de las 
teclas y puede conectar una pista 
con la otra. Este es el esquema uti¬ 
lizado en el Spectrum de 16 y 48K; 
en el Plus y el 128K la cosa se 
complica al unir algunos contactos 
más de dos pistas, pero el resultado 
final es el mismo. Asi, según apa¬ 
rezcan en la dirección de un port 
los bytes 8-15 puestos a cero, po¬ 
dremos saber el estado de las semi- 
filas que les corresponden en la 
malla. El resultado será un número 
cuyos bits 0-4 puestos a cero indi¬ 
carán si están pulsadas cada una de 
las teclas de la semifila selecciona¬ 
da. El valor de los bits 5-7 del re¬ 
sultado no es significativo, y de he¬ 
cho cambia con las distintas ver¬ 
siones del Spectrum. 

Dado lo sencillo del sistema uti¬ 
lizado, puede haber problemas de 
realimentación cuando se pulsan 
más de dos teclas a un mismo 
tiempo, por ejemplo, si pulsamos 
CAPS SHIFT. «x» y «m» a la vez 
cualquier sistema de lectura que 
empleemos creerá que también 
SPACE está siendo pulsada (pue¬ 
des probar a utilizarlo como 
BREAK). 

Para comprobar el estado de una 
determinada teda o grupo de ellas 
podemos acudir a la tabla de la Fi¬ 
gura 4, en la que se dan los distin¬ 
tos valores que corresponden a las 









ENSAMBLADORES 

EDITOR 

ENSAMBLADOR 

PICTURESQUE 

Continuamos con los comentarios sobre los pro¬ 
gramas ensambladores más característicos de los pre¬ 
sentes en nuestro mercado. En esta ocasión le toca el 
tumo al Editor Ensamblador Picturesque, otro de los 
preferidos por los aficionados al código máquina por 
sus prestaciones y facilidad de manejo. 

En líneas generales se trata de un ensamblador bas¬ 
tante completo. El editor de líneas es fácil de utilizar, 
su único defecto es que carece de la posibilidad de in¬ 
serción, algo que sí tienen ensambladores de menos ca¬ 
lidad. Salvo este detalle, ofrece casi todas las opciones 
que se le pueden pedir a un programa de este tipo: re¬ 
muneración, auto, utilización con cualquier impreso¬ 
ra, grabación y carga en cassette y microdrive, etcétera. 

Admite números en base decimal y hexadecimal 
y para esta última hay que indicarlo con una «H» 
después del número. Si un número hexadecimal co¬ 
mienza por una letra hay que ponerle un cero delan¬ 
te para que el ensamblador lo distinga de las etique¬ 
tas. Es obligado el uso del comando END al final de 
cada listado. No admite que incluyamos las etiquetas 
en líneas independientes, por lo que en los listados 
que utilicen esta técnica habrá que fusionar cada una 
de esas líneas con la que le siga, por ejemplo: 

LDB, FO 

RETARD 

DJNZRETARD 

RET 

deberá sustituirse por: 

LD B, OFOH 

RETARD DJNZRETARD 

RET 

END 

El programa no es reubicable, aunque incluye en 
el mismo paquete versiones para 16 y 48 K (algo re¬ 
cortada y por tanto más limitada la primera). Esto 
no es en realidad un problema grave, dado el uso que 
hace de la memoria, en el que el programa fuente crece 
hacia abajo en el espacio de reserva del BASIC. 

En definitiva, se trata de un ensamblador bastante 
cómodo de utilizar por el uso de palabras-clave al es¬ 
tilo del BASIC que acorta el período de familiariza- 
ción con el programa. Recomendado para quien em¬ 
pieza. 


ocho semifilas del teclado. Si sólo 
queremos saber si una tecla cual¬ 
quiera ha sido pulsada, podemos 
utilizar el port 254 y comprobar si 
en los bits 0-4 del resultado hay al¬ 
gún cero. 

En realidad el conocer todo esto 
sólo nos resultará de verdadera uti¬ 
lidad cuando deseemos saber si se 
están pulsando dos teclas a un 
tiempo. Para necesidades menos 
sofisticadas es más práctico utili¬ 
zar las rutinas de la ROM como hi¬ 
cimos en el capítulo 5. 


Otros 

dispositivos 

Hay docenas de dispositivos dis¬ 
tintos que pueden ser conectados 
al Spectrum. Esto se hace gracias a 
los interfaces, que, en realidad, no 
son sino dispositivos de entrada y 
salida que sirven de enlace entre el 
Z-80 y microdrives, impresoras, 
discos, joysticks, lápices ópticos, 
otros ordenadores y un largo nú¬ 
mero de etcéteras. 

Uno de los más utilizados es el 
Interface 1, que permite el uso del 
RS232, la red local y los microdri¬ 
ves. La mejor manera de utilizar 
estos dispositivos es aprovechando 
las rutinas de la nueva ROM que 
incorpora el mencionado interface 
como veremos más adelante. 

Otro mítico periférico del Spec¬ 
trum es la ZX-Prínter, que utiliza 
el port 251. Haciendo un OUT a 
esa dirección con el bit 7 activado 
imprimirá un punto, y si el bit 2 
está a cero pondrá en marcha el 
motor. Algunos interfaces de im¬ 
presora y otros dispositivos utili¬ 
zan los bits 6 ó 7 para direccionar 
su port, o inclusive bits del byte 
alto mientras mantienen el de la 
ULAa 1. 

Es posible que algunos de los 
términos utilizados en este o en al¬ 
guno de los anteriores capítulos no 
hayan sido comprendidos del todo 
por los menos aventajados. No de¬ 
ben desesperar, aunque el princi¬ 
pio puede ser realmente duro, a 
medida que se adentren en el estu¬ 
dio de esta 1 bonita materia las cosas 
se irán haciendo más fáciles. Es en¬ 
tonces cuando se debe volver atrás 
y releer todo cuanto nos hizo du¬ 
dar la primera vez. 
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La protección 

software 


D ebido a que la entrada y 
salida de datos bajo el 
sistema operativo QDOS 
es un dispositivo inde¬ 
pendiente, la protección de pro¬ 
gramas resulta algo problemática. 
Cualquier archivo, esté grabado en 
diskette o microdrive. puede co¬ 
piarse fácilmente en una impreso¬ 
ra, pantalla o cualquier otro dis¬ 
kette o microdrive. Esto es particu¬ 
larmente cierto para los programas 
SuperBASIC que se han almacena¬ 
do como archivos en forma de ca¬ 
racteres ASCII, ya que el comando 
COPY mdvl_nombre_de-archivo 
TO ser revelará al instante toda la 
información de forma totalmente 
legible. 

En cuanto al código máquina, 
aunque éste necesita desensam¬ 
blarse, el hecho de que el QDOS 
permita extraer bytes de cualquier 
lugar de la memoria mediante el 
comando SBYTES y volverlos a 
cargar con LBYTES en otra locali¬ 
zación totalmente diferente, facili¬ 
ta la desprotección. 

Por lo tanto, para proteger un 
programa de QL deben idearse mé¬ 
todos especiales, para que sola¬ 
mente funcione cuanto esté en su 
soporte original o para hacer el 
proceso de copia lo más complejo 
posible. En este articulo pasare¬ 
mos revista a algunos métodos dis¬ 
ponibles para el usuario. 

RUTINA DE CARGA 
AUTOMATICA 

La carga de programas comer¬ 
ciales desde el soporte en que han 
sido grabados (cartuchos microdri¬ 
ve) a la memoria de modo que fun¬ 
cionen automáticamente, se reali¬ 
za mediante un archivo BOOT. 

En el QL. inmediatamente des¬ 
pués de pulsar una de las teclas de 
función para seleccionar el forma- 

QL2 


La protección de programas 
tiene un significado distinto 
para cada uno de los 
diferentes tipos de usuarios 
existentes. En la escala 
superior, las casas de 
software emplean medidas de 
protección para mantener el 
fruto de costosas inversiones 
fuera del alcance de la 
explotación criminal de 
terceras personas (piratas). 
Para el programador, es un 
medio de mantener en secreto 
el resultado de muchas horas 
de duro trabajo desarrollando 
revolucionarios algoritmos. 

En cuanto al hombre de 
negocios, significa impedir el 
acceso a información 
reservada. Finalmente, puede 
ser también, para el simple 
aficionado, un medio 
eficiente de cobertura de una 
mala programación. En este 
artículo, vamos a revisar 
algunos métodos para 
proteger sus propios 
programas. 

to de pantalla, la máquina intenta 
abrir un canal para un dispositivo 
llamado BOOT, consistente en 
una lista de comandos almacena¬ 
dos en ROM. Si falla el intento, se 
prueba a abrir un archivo de entra¬ 
da BOOT que esté almacenado en 
el microdrive 1. Este archivo, for¬ 
mado por una serie de líneas BA¬ 
SIC en ASCII, se cargará normal¬ 
mente en la mayoría de los progra¬ 
mas SuperBASIC y/o código má¬ 
quina (incluyendo una sentencia 
CALL para estos últimos). 

Este mecanismo gira en torno a 
la variable del sistema BV_ 
COMCH, en la dirección 


del 


$0084(Aó), la cual contiene una 
palabra de información con el ca¬ 
nal ID para el comando de entrada 
de flujo. Normalmente dicho con¬ 
tenido es cero para el canal de en¬ 
trada del teclado, pero al producir¬ 
se una carga automática (BOOT) o 
al entrar en funcionamiento el co¬ 
mando LOAD, contendrá el canal 
ID para archivo abierto. 

En lugar de seguir el procedi¬ 
miento de carga automática descri¬ 
to más arriba, el pirata podría in¬ 
troducir esta orden: LOAD 
mdvl_boot, e inmediatamente lis¬ 
tar el programa para descubrir más 
información. Pero como este ar¬ 
chivo es una lista de comandos que 
no necesitan números de línea, se 
autoejecutará siempre aunque se 
emplee LOAD o MERGE. 

El listado 1 es una demostración 
de cómo establecer un archivo de 
ejecución automática (BOOT). 
Una vez grabado, intente cargar el 
programa con LOAD o MERGE y 
pulse BREAK a continuación 
(CTRL + SPACE). Seguidamente, 
introduzca el comando LIST y 
descubrirá que el programa ha de¬ 
saparecido, ya que no es un pro¬ 
grama propiamente dicho, sino 
una iista de comandos directos 
provenientes del cartucho de mk 
crodrive. Este método puede usarse 
para cualquier programa Super- 
BASIC (no necesita llamarse 
BOOT ni tampoco tiene por qué 
estar forzosamente almacenado en 
el microdrive 1). 

INVISIBILIZANDO 

ARCHIVOS 

Aunque el método anterior pue¬ 
de hacer desistir temporalmente al 
pirata, todavía puede estar en con¬ 
diciones de utilizar el comando 
COPY. En este caso deberemos fa¬ 
bricar un archivo invisible, de 








modo que no aparezca en el di¬ 
rectorio. Un ejemplo de utiliza¬ 
ción de este método es SBYTES 
mdvl_,0.49l52. En este caso, gra¬ 
baríamos el contenido de la ROM 
en el microdrive 1 con un nombre 
de archivo nulo. Al efectuar un 
DIR mdvL, el directorio no mues¬ 
tra ningún nombre de archivo, 
pero el número de sectores libres 
se verá sensiblemente reducido. 

Como alternativa, también pue¬ 
de almacenar archivo con nombres 

como mdvl_«ESPACIO». Estos no 

pueden copiarse porque el QL no 
puede trabajar si tras c! subrayado 
encuentra un carácter de espacia¬ 
do. 

DESACTIVACION 
DE BREAK 

Uno de los métodos más conoci¬ 
dos para evitar la piratería consiste 
en inhabilitar la acción de 
BREAK. 

El teclado sufre una exploración 
cada 20 mili segundos debido a las 
interrupciones generadas por una 
de las ULAs del QL. Afortunada¬ 
mente, este mecanismo de inte¬ 
rrupción está condicionado por el 
puntero de una tabla de datos si¬ 
tuado en SV_PLIST (en la direc¬ 
ción $28030). Esta palabra apunta 
a una lista de 8 byíes. Los primeros 
4 byíes son el puntero del siguiente 
elemento de la tabla de datos. Los 
otros 4 byíes contienen el puntero 
del mecanismo de interrupción de 
50 Hz que debe ejecutarse en ese 
momento. Al encenderse, el QL 
sin expansión sólo tiene una entra¬ 
da en la tabla, consistente en una 
rutina (llamada cada vez que se 
produce una interrupción) que tra¬ 
baja con todos los interfaces exter¬ 
nos del QL mediante la comunica¬ 
ción con las ULAs principales y el 
IPC (Inteligent Peripheral Contro¬ 
ller). 

Para desactivar BREAK desde el 
SuperBASIC solamente debe in¬ 
troducirse el siguiente comando: 
POKE_L 163900,0. 

Al colocar un 0 en esa dirección 
de memoria, el QL ignora las ta¬ 
reas externas por estar vacía la ta¬ 
bla. Esto afectará a cualquier hard¬ 
ware extra que se esté utilizando y 
emplee interrupciones de 50 Hz. 


LISTADO 1 

I : í :■ Ür . N _ N í. vi # 4,,, ¡n 6 V X b <3 O t 
l -I Q 1 Tí ! N f #4 ., ■ ¡R¿Pe;át i bü p : 11 ; 

.1 *50 I R I NT 144 * " PAPER RMD.^ú TO 

n-'.i Ul #4, '• PR J.NT l'ry pfessi ng 4BPEAK. " ; : 41 ; 
i /<I"I ■ 1 i’ l ‘ #4. 1 E M i.) I'&t i oop 11 
TOO ,.C:LDSE #4 




LISTADO 2 

MT LSCHD 

EGU 

*1 E 

INTERRÜF'CION M 

BASIC -HEADER EÜU 

$68 

TAMAÑO CABECERA CARGADOR SB 

BV Bfifc 

EQU 

$OOBF 


JB START 

EÜU 

$00 I 4 


SV BASIC 

EDU 

2.8010 

DIRECCION CABECERA SB 

SV SCRST 

EQÜ 

$28033 

DIRECCION FLAG ESTADO PANTO 

WAXTING 

EQU 

-2 


-t COMIENZO 

DEL CODIGO 




LEA 

TASKxAl 

PUNTERO RARA LA NUEVA TAREA 

DE PLANIFICACION 


LEA 

TASL„LINK,AO 

PUNTERO PARA RESERVA DE ESP, 


NOVE -L 

Ai * 4 CAOS 

ALMACENA PUNTERO DE TAREA 


MOVEQ 

“MT LSCHD,DO 

INTERRUPCION 


TRAP 

RTS 

^ l 

RETORNO AL EB 

* TAREA DE 

PLANIFICACION A LLEVAR A 

CABO 

TASF 

MGVEA.L 

GV_BASIC,AO 

ESTABLECE DIRECCION DE LA 
CABECERA DE LA RUTINA SB 


LEA 

BASIC HENDER,(AO),A1 


TAS 

BV BEL(Al) 



TB T ,U 

JB_STATÍAÓ) 

EXAMINA ESTADO TAREA SB 


BGEw S 

NO_ALTER 

NG ALTERAR SI SUPERBASIC NO 
ESTA SUBFUNDIDO 


MOVE. 

IT í NG, JE_STAT (AO) 

NO ALTEF 

CLRvB 

SV_SCRST 

SE ASEGURA QUE LA PANTALLA 

ESTE ACTIVA 


RTS 



* RESERVA 

ESF-ACÍO DE 

TRABAJO 



BSxL 

2 



END 




LISTADO 3 

u;¡-U LET r&5'er V íííj m addre*&=RESPR ! (60 ) 

J. 40 LET ad tí r e : A eser ved ád tí r ^55 

ISO REStQRE 

:l 60 REPeat v nd„ ne^cotíe* 

1 /•:> J.' EüF i í -II -:.H E X I f r ead _and_stor <=?„mac,h ine^code 
-i B iJ REAL) ¿11 achineJedele_bytt? 

190 ¡''0KL-: ríüdress , machi ne^code_by-te 
2 i 1 Q LEI' add r e = á**-ad ó re& 5 + i 

■¿id EWD RlLF'eat read^and. ; sEor^_mac:hirití_c»de 
22 0 u AL L r & ssrve d a d tí r é ss 

4 40 F’RIN 1 #0 , "Nqw try pressi np t>reakv-. fl 

240 PfPeat -fprever ; 

FUE boroer_widLh—99 Tü O STEP -4 

2fcrO BuFíDEvs: bar dsr _wi csth , RND t 0 Tü 7 ) 

270 ENÜ FOR baraer. ti wi.dth 
280 END REF'eat íorever 
29 U : 

300 I>A*f A 67!, 250-,, O , 16,65,250,0 „ 46 , $3, 73 
• 10 DATA 0,4, i 12,30,78,6&,70-, 117,32, 121 
■20 DAT A 0,2,118^6,67.232,0,104,74,233 
'530. DAT A O, :l 43,74,104., 0,20,108, 6 ,49, 124 
340 DATA 256,234,O,20, 66 ,57,0,2,128,51 
•350 DATA 78,117 ,.0 , O , Q , Q , 6 , ó ,0,0 
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LISTADO 4 


PC^TCTRL 

EQU 

* iB0O2 



PC MCTRL 

EQU 

*iB020 



5V TMODE 

EQU 

*2B040 



MD^SECTR 

EQU 

*Oi2A 



MOTORS_QFF_AH 

EQU 

12B5A 

DIRECCION EN ? ALT 

(VER¬ 




SIDN 1,02) 


MOTORS OFF JM 

EQU 

*2B64 

EN ÍV. 1,03) 


MOTORS_QFF 33 

EQU 

*2C50 

EN * J5* (V* 1.10Í 


MOTORS OFF JSÜ 

EQU 

% 20 9A 

EN ’JSUMV. 1Ü10) 


KÜTORE_ÜFF_ME 

EQU 

S2CCC 

EN * MG' (V. 1,131 


MOTGR_CN_AH 

EOU 

$2Bá4 

DIRECCION EN ? AH 11 

DE LA 




RUTINA DE MOTOR ENCENDI- 




DO DEL MXCRDRIVE 


MOTORPON JM 

EQU 

*2E70 

EN ’JM* 


MOTOR ON JE 

EQU 

92C5-Ó 

EN p JS r 


MOTOR ON JSÜ 

EQU 

Í2C9A 

EN ’JSU’ 


MOTOR ON ME 

EQL! 

Í2CD2 

EN ? MG > 


TIME GÜT 

EQU 

1000 



PC NOTMD 

EQU 

7.11100111 



PC^SERB 

EQU 

7.00010000 



INTS_OFF 

EQU 

7.0000011100000000 


INTE^GN USER 

EQU 

■/.i íoi íoooi mi ii i 


ERR ÓK 

EQU 

0 



ERR„NF 

EQU 

- 7 



ERREF 

EQU 

-16 



* COMIENZO DE LA 

RUTINA 

DE LECTURA DE 

CABECERA DE UN SECTOR DE 

CARTUCHO MIGRQDRIVE 





TRAP 

-o 




CMP.L 

*9 * D1 




BGE.S 

NDT ROUND 




TST.L 

DI 




PEQ. S 

NQT_FOUND 




DPI, W 

“INTS OFF,SR 




LEA 

F'C MCTRL, A3 




MQVE.e 

Xk PC_NOTMD, DO 




AND. B 

5V„TM0DE,DO 




ORI* B 

^rc_befen do 




MDVE .B 

DO,PC„TCTRL 




NOVE.B 

DO,SV TMODE 




MOVEA.L 

-MOTOR ON JS, 

AO 



JSR 

ÍAOJ 




MDVE P W 

-TIME_0UT P D3 



BAD_HEADER 

SUBO- W 

n s D3 




PEO. E 

BADJ1EDIUM 




LEA 

HEADER BUFFER 

, Al 



NOVEA.W 

MD_5ECTR,AO 




JSR 

í4000 CAOS 




BRA. S 

BAD^MEDIUM 




BRA.S 

BAD_HEADER 




MOVED 

*ERR_GK*D7 




BRft.S 

FIN TSH 



NOT_FOUND 

MOVEQ 

^ERR JMF* D7 




BRA. S 

QUIT 



DAD MEDIUM 

MOVEQ 

-ERR_EF , D7 



FENISH 

MGVEA.L 

-MOTORS OFF J 

S,AO 



JSR 

CAO» 




MGYE . 3 

-PC_NOTMD,DO 




AND. B 

EV ..TMODE, DO 




MDVE. B 

DO,PC„ T CTRL 




MDVE .3 

DO,sv"TMODE 



□UIT 

AND I.W 

A INTS_DNJJSEF: 

,SR 



MOVE.L 

D - ? Pf. 




C, T3 




* ALMACENAMIENTO 

PARA CABECERA DE EECT 

□R 


HEADEF: E'_ r£r FER 





FLAG 

DB. B 

i 



SECTOF^NUMBER 

DE. 3 

1 



ÑAME 

DS.B 

10 



FAUDJJUMBEF 

DS* W 

1 




END 





El método sólo es efectivo con pro¬ 
gramas SuperBASIC sencillos, 
aunque el teclado puede seguir 
leyéndose empleando KEYROW 
(por ejemplo, para leer el cursor o 
las teclas de función). 

UN METODO MAS 
EVOLUCIONADO PARA 
LA DESACTIVACION 
DE BREAR 

La desactivación de BREAK 
puede realizarse de una manera 
más efectiva con el empleo de una 
rutina adicional de planificación 
(Scheduler Loop Task). El propio 
sistema operativo del QL posee 
una rutina de este tipo, consistente 
en un programa que controla y 
planifica la secuencia de tareas y la 
distribución de los medios de la 
máquina. En nuestro caso, será so¬ 
licitada cada vez que se produzca 
un llamamiento a la rutina de 
mantenimieto del QDOS, ejecu¬ 
tándose siempre antes que esta úl¬ 
tima. 

Para que pueda desactivarse 
BREAK, primero tenemos que 
aseguramos que la variable del sis¬ 
tema BV^RBK en la dirección 
$008F(A6) nunca contenga 0 y que 
la tarea Super-BASÍC siempre esté 
activa. También debe desactivarse 
el efecto de CTRL + F5 para ase¬ 
gurar que siempre esté en funcio¬ 
namiento la pantalla, establecien¬ 
do adecuadamente el contenido de 
la variable del sistema asociada 
con ella. 

El programa ensamblador del 
listado 2 establece una tarea de 
planificación para que BV_BRK 
nunca contenga 0 (con lo que se 
evita que el QDOS advierta la pul¬ 
sación de BREAK) e inspecciona 
el estado de la tarea SuperBASIC 
alterándolo en consecuencia. La 
rutina entra siempre en funciona¬ 
miento antes que las tareas de pla¬ 
nificación de la ROM, las cuales 
incluyen la secuencia de activa¬ 
ción de BREAK. 

La instrucción TAS (Test and 
Set) usada en el programa, analiza 
y establece el bit 7 del byte de ope¬ 
rando en una operación indivisi¬ 
ble. Esta es una forma limpia de 
señalar que BREAK no se ha pul¬ 
sado, en lugar de cargar $80 en la 





















variable del sistema correspon¬ 
diente. 

Esta rutina puede incorporarse 
en el interior de su archivo BOOT 
utilizando el método descrito ante¬ 
riormente. En caso de no disponer 
un ensamblador, utilice el progra¬ 
ma del listado 3, que contiene un 
cargador de código máquina y una 
demostración de sus efectos. 

COMO IMPEDIR 
LA COPIA DEL 
CARTUCHO ORIGINAL 

Aparte de la utilización de car¬ 
tuchos ROM, el mejor medio de 
protección en el QL consiste en 
obligar al comprador de software a 
mantener su cartucho original . 

Para llevar a cabo este método, 
debe introducirse el cartucho en el 
microdrive 2 y leer una cabecera de 
sector, obteniéndose un número 
aleatorio de 16 bits, creado en el 
momento del formateo. Si el nú¬ 
mero registrado en el cartucho ori¬ 
ginal se lee durante su creación y 
se carga en una tabla en el carga¬ 
dor del programa que necesita pro¬ 
tección, este cargador puede com¬ 
pararlo con el número leído en el 
cartucho del microdrive 2. En caso 
de no ser el mismo, o no existir 
cartucho, entrará en funciona¬ 
miento un sistema de reinicializa- 
ción. En caso contrario, el carga¬ 
dor seguirá cargando el programa 
principal. 

Por supuesto, el pirata tiene to¬ 
davía una posibilidad entre 65536 
de formatear su propio cartucho 
con el mismo número aleatorio de 
16 bits que el del original. Sin em¬ 
bargo, esto bastará para obligarle a 
desistir de sus propósitos. 

Cargando el programa del lista¬ 
do 5, podrá hacer funcionar el có¬ 
digo máquina, que colocará un nú¬ 
mero aleatorio en el cartucho del 
microdrive 1. A continuación, de¬ 
berá introducir otro cartucho (o el 
mismo) en el microdrive 2. Enton¬ 
ces, el programa lleva a cabo la 
comparación y le dirá si es o no es 
el mismo cartucho. 

Las rutinas ROM para poner en 
marcha y parar los motores de los 
microdrives no son vectoriales 
como las de lecturas de cabecera 
de sectores, sin embargo, en futu- 


LISTADO 5 


1 00 
lio 
120 
130 
140 
1 50 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 

2 6 O 
270 
2 SO 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
54o 
550 
560 
570 
HBO 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 


MODE 4 

LET re5erved„addre«s=RESPR (144) 

LET addres5-reservEd_adctr'e55 
RESTORE 

REPeat read_and_store_frtachine_cade 

IF EOF THEN ÉXET read_and_store_machinescode 

READ machine^code^byte 

F'QKF. ¿ddreas,machine_code_byte 

LET addre^s=address+l 

EMD REPeat read_and_stqrB_mñchine„CDde 
LET r Qfn_ver$-VER:£ 

IF r ú[tt_verl(l TD 2) = FM" OR ro^Vérí-'FB 1 THEN 
PRIIM'i TReturn QL to Sinclair" 

STOP 
END IF 

IF rom_verl (1 TO 2) -'AH' THEN 
PQKE_W reserved^address+54 t 1 11üB 
POKE_W res(?rv'Bdjaddres5+9ó, 11114 
END IF 

IF rpiFi^verf i 1 TO 2) = 'JM' THEN 
PÜKE_W reserved_address+54 t 11120 
PQKE_W reserved address+96,111 1 4 
END IF 

IF rom^verl <1 TO 3i= r JSLL THEN 
PÜLE_W reserved_address+54 T 11424 
POKE_W reserved ,11418 

END IF 

IF rom_verf¿( 1 JQ 2) = MS ' THEN 
PÜKE_W reserved_addrsss+54,11474 
FOKEreserved_address+96, 1 1460 
END IF „ 

REPeat testan i crocír i vo_car t r i dqes 

PRINT "Place a cartndge in mdvl and press a key" 
PAUSE 

CALL r eserved_address ,1 y 

LEI mdv_one_humber=PEEK_W (reserved_addr0ss+132) 
PRINT "place a cirtndge in mdv2 and prese a key M 
PAUSE 

CALL i r essrvGd_3ddres5,2 

LET mdv_t.wo_number*PEEK_ltf treserved^address+-1 32) 
IF mdv_one i _nufíiber=mdv i _twG_number THEN 
PRINT "Cartritíge ir mdv2 same as that in mdvl" 
ELSE 

PRINT "cartridge in mdv2 not the same as ir mdvl" 
EMD IF 

END REPeat test_microdri vetear tr idges 

DATA 73,64,170,188,0,0,0,9, IOS, 76 
DATA 74,129, 103,72,0,124,7,0,71,249 
DAT A 0,1,128,32 ,16,60,0,23.1 , 192,57 
DATA 0,2, 128,16.8,0,0,0, 16,19, 192 
DATA 0 ,1, 1 2B,2,19yl92 f 0,2,128, 1 60 
DA TA 32,124, O , O , 44,36,78 144,54,60 
DATA 3 , 232 , 83 , 67 ,103,24, 67 , 250,0,62 
DATA 48,120,1,42,78,168,64,0,96,10 
DAT A 96,236,126,0,96 ,6,126, 249,96,32 
DATA 1 26 ,240,32,124,O,O,44,80,78,144 
DATA 16,60,0,231,192,57,0,2,128,160 
DATA 19,192,0,1,128,2,19, 192,0,2 
DAT A 128 * 160 ,2,124,216,255,32,7,78,13 7 
DAT A O ,O , O,0,0, O , O,O,O,O 
DA I A 0,0,O,O 


ras versiones del QL se podrá re¬ 
mediar esto. De momento, debe 
conocer cuál es su versión de QL 
para poder modificar el programa. 

Pasa saber cuál es su versión de 
ROM, deberá utilizar la función 
VER$. El programa del listado 4 
ha de ensamblarse incluyendo las 


direcciones correctas que necesita 
su versión. En cuanto al programa 
de demostración SuperBASIC 
(listado 5) las direcciones necesa¬ 
rias se POKEan de forma automá¬ 
tica. 

Orlando Aran jo Martín 












ICE: Iconos,ventanas 

yratones 


C uando se conecta un or¬ 
denador provisto de estas 
facilidades, aparece en 
pantalla la superficie de 
un escritorio con diversos objetos 
situados sobre él: son los iconos. 
Cada uno de ellos "posee una fun¬ 
ción determinada, que se corres¬ 
ponde con comandos del sistema 
operativo. Para facilitar la selec¬ 
ción se hace uso de un ratón, dispo¬ 
sitivo que al ser desplazado sobre 
la mesa provoca el movimiento de 
un cursor en la pantalla. Colocado 
dicho cursor sobre el icono selec¬ 
cionado, se pulsa una tecla incor¬ 
porada al ratón y el ordenador eje¬ 
cuta la tarea solicitada. Al igual 
que en un escritorio verdadero, po¬ 
demos superponer en la pantalla 
diversas ventanas a modo de docu¬ 
mentos con la información que ne¬ 
cesitamos consultar. De esta ma¬ 
nera, el uso del teclado queda re¬ 
ducido al mínimo. 

El Macintosh, de Apple Com¬ 
puter, incorpora un sistema de ico¬ 
nos plenamente evolucionado, y 
su facilidad de manejo ha marcado 
un hito en la historia de los orde¬ 
nadores personal es. Recientemen¬ 
te, Digital Research ha desarrolla¬ 
do GEM, un entorno de iconos, 
ventanas y ratón del que existen 
versiones para diversas máquinas, 
como el IBM PC, el Atari 520 
ST, y otras. 

La idea de facilitar el trabajo y 
aprendizaje del usuario es sin duda 
la última moda. Sin embargo, co¬ 
menzó a forjarse a comienzos de la 
década de los 70, en el centro de 
Xeros Corp en Palo Alto, Califor¬ 
nia, cuando los investigadores de 
esta empresa decidieron que eran 
los ordenadores los que habían de 

QL6 


Hasta hace poco, el usuario 
sin conocimientos de 
informática debía entablar 
una lucha desigual con su 
ordenador. Los sistemas 
operativos obligaban al 
aprendizaje de enormes listas 
de comandos y sintaxis. El 
Lidsa de Apple, mediante el 
empleo de un interface de 
usuario basado en ventanas, 
iconos, ratón y menus pulí 
down, inició un proceso de 
simplificación en la 
utilización de ordenadores 
personales. Al Lisa le 
sucedió el Macintosh, con 
características similares y un 
precio más atractivo. Con el 
ICE (Icón Control 
Environment), el QL se 
incorpora a la misma 
tendencia. 


adaptarse a las personas, y no al 
contrario, como venía sucediendo. 

ICONOS EN EL QL 

El QL también se ha querido in¬ 
corporar a estas innovaciones. Ba¬ 
sándose en los sistemas ya existen¬ 
tes, la compañía Eidersoft ha crea¬ 
do el Icón Control Environment 
(ICE), suministrado en un cartu¬ 
cho ROM. Diseñado como «herra¬ 


mienta amable» de cara al usuario 
para hacer frente al compiejo 
QDOS, el ICE tiene mucho en co¬ 
mún con los sistemas de iconos y 
ventanas de otros ordenadores. 
Esto permite proteger al usuario de 
los desvarios del sistema operativo 
gracias a un extenso surtido pro¬ 
tector a base de gráficos. La idea 
fundamental del ICE consiste en 
aproximar el manejo del ordena¬ 
dor a la gestión habitual de una 
oficina. 

Después de enchufar el QL con 
la EPROM ICE de 16 K insertada 
en el conector de ampliación de 
memoria ROM, en la pantalla 
aparece un escritorio sobre el que 
hay dibujadas diversas figuras o 
iconos que identifican las dife¬ 
rentes tareas que puede realizar el 
QL, archivos disponibles y varias 
facilidades como calendario, cal¬ 
culadora y papelera. 


COMODIDAD Y 
RAPIDEZ DE 
MANEJO 

Para utilizar el ICE. todo lo que 
el usuario debe hacer es limitarse a 
desplazar por la pantalla una fle- 
chita a modo de cursor o puntero 
mediante las teclas de desplaza- 
mioento.joystick o ratón (este últi¬ 
mo estará disponible próxima¬ 
mente en nuestro país). Cuando el 
puntero está junto al icono elegido 
por el usuario o cerca de una de las 
opciones de control (situadas en la 
parte inferior de la pantalla) lo 
único que hay que hacer es pulsar 
la barra de espaciado una o dos ve¬ 
ces, dependiendo de si desea selec- 







GEM en IBM PC. Su parecido con el sistema del Macintosh no puede 
ser mayor. 


donar la tarea o inicializar cual¬ 
quier operación implicada. El pro¬ 
ceso, que no requiere ninguna in¬ 
troducción de datos desde el tecla¬ 
do, es prácticamente un juego de 
niños. 

Las operaciones básicas de man¬ 
tenimiento, como pueden ser la 
extracción de directorios, copia de 
archivos y ejecución de programas, 
se llevan a cabo de forma implícita 
por el ICE. El usuario sólo se limi¬ 
ta a señalar y pulsar, ICE hace el 
resto. Por ejemplo, si se ve en la 


necesidad de copiar o borrar varios 
archivos, basta señalar el archivo 
en cuestión y llevarlo después a su 
dispositivo de destino o a la pape¬ 
lera según tenga que copiar o des¬ 
truir el archivo señalado. Si las 
operaciones a realizar son de ca¬ 
rácter irreversible, ICE pedirá al 
usuario la confirmación de sus in¬ 
tenciones. Cuando se producen 
errores, la pantalla muestra los 
mensajes correspondientes, escri¬ 
tos, por supuesto en inglés (aunque 
bastante sencillos de comprender). 


GESTION 
DE ARCHIVOS 

Los archivos en disco y micro- 
drive se paginan en la pantalla en 
grupos de 12. ICE es capaz de dis¬ 
tinguir automáticamente diferen¬ 
tes clases de archivos, utilizando 
diferentes iconos para representar¬ 
los. Las clases de ficheros que pue¬ 
de reconocer son archivos genera¬ 
les en código máquina, programas 
en código máquina ejecutables 
(EXEC), programas en Super- 
BASIC, documentos QUILL, ho¬ 
jas del ABACUS, gráficos del EA- 
SEL, y bases de datos del ARCHI¬ 
VE, así como archivos de ejecu¬ 
ción automática (boot). La mayor 
ventaja que se desprende en este 
caso, es que el usuario puede saber 
mediante un simple vistazo el con¬ 
tenido de un archivo. Otro punto 
menos evidente consiste en que 
para hacer funcionar un programa 
ya no es necesario distinguir entre 
archivos que se ejecutan con 
EXEC o RÚN. Los programas car¬ 
gadores de los paquetes de PSION 
(versión 2.000) ya no son necesa¬ 
rios. 

El mantenimiento general y las 
operaciones del sistema aparecen 
de modo explícito como opciones 
en un panel de control en la parte 
inferior de la pantalla. Estos per¬ 
miten cambiar el nombre de archi¬ 
vo (RENAME), inspeccionar sus 
contenidos (VIEW) y solicitar in¬ 
formación acerca de uno de ellos 
(INFO), con lo cual conoceremos 
el nombre completo del archivo, 
longitud y tipo y últimos datos rec¬ 
tificados o añadidos. Con las op¬ 
ciones de este panel también se 
pueden formatear diskettes o car¬ 
tuchos de microdrive (FORMAT) 
y solicitar información referente a 
la memoria disponible, rutinas que 
están funcionando y la versión del 
QDOS o ICE que se está utilizan¬ 
do. La opción CUSTOM permite 
variar según las necesidades del 
usuario, los datos (que normal¬ 
mente funcionan por omisión con 
unos valores predeterminados) re¬ 
ferentes a la fecha, hora, nombres 
de dispositivos, instalación de im¬ 
presora, velocidad del cursor y 
sensibilidad de las teclas. Final¬ 
mente, existe una opción para 

017 
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MacCoach, un programa para aprender a manejar el Macintosh. 


abandonar el ICE y volver al Su¬ 
pe rR ABIC. 


FUNCIONES 

SUPLEMENTARIAS 

ICE incorpora dos funciones es¬ 
peciales: calendario y calculadora. 
Utilizando la primera, la pantalla 
muestra un calendario completo 
con todos los meses, marcando la 
fecha actual iluminándola en rojo. 
Con el empleo de la segunda, apa¬ 
rece en la pantalla la parte frontal 
de una típica calculadora de bolsi¬ 
llo, con sus teclas y pantalla de vi¬ 
sual ización de datos, Incluye una 
tecla de memorización y porcenta¬ 
je y funciona desplazando el cursor 
sobre las teclas. 

Al adquirir la EPROM ICE, 
Eidersoft también proporciona al 
comprador de un cartucho de mí- 
crodrive que contiene una serie de 
programas (para utilizarlos con¬ 
juntamente con el ICE) que le per- 

QíP 



Pantalla de QL con ICE, Se observa 
la calculadora y varios iconos. 

miten hacer funcionar en multita- 
rea cuatro programas al mismo 
tiempo. Este paquete de progra¬ 
mas (llamado CHOICE) puede ser 
de gran utilidad con una amplia¬ 
ción de 256 Khytes de memoria, ya 
que si reservamos 128 Khytes para 
ARCHIVE, ABACUS y QUILL 
(por ejemplo) podremos hacerlos 
funcionar simultáneamente y ac¬ 
ceder individualmente a cada uno 
de ellos pulsando simplemente 
CRTR + F3. No solamente es im¬ 
presionante la velocidad con la 


que nos movemos entre las distin¬ 
tas aplicaciones, sino también el 
hecho de que cuando volvemos a 
una de ellas, nos encontramos 
exactamente en el mismo punto 
donde las dejamos antes, ya sea do¬ 
cumento, base de datos u hoja de 
cálculo. 

Al no tener un elaborado siste¬ 
ma de ventanas, el ICE es mucho 
menos sofisticado que otros pro¬ 
gramas semejantes. Sin embargo, 
hay que tener en cuenta que el 
programa solamente ocupa 16 K, 
en lugar de los 90 K de su hermano 
mayor GEM. De todos modos, es 
fácil de utilizar y está diseñado a 
prueba de errores. En combina¬ 
ción con el paquete CHOICE, abre 
una nueva dimensión para el usua¬ 
rio que no había logrado sacar el 
máximo fruto de su QL hasta este 
momento. 

Nota: ICE se comercializa en e! 
Reino Unido a un precio aproxi¬ 
mado de 60 libras. 

Orlando Araujo Martín 



























































CATALOGO DE SOFTWARE 
PARA ORDENADORES 
PERSONALES IBM 


TODO EL CATALOGO DE SOFTWARE 
CON MAS DE 800 FICHAS 




1.* ENTREGA 3.500 — PTAS. 
(400 FICHAS + FICHERO) 

RESTO EN TRES 
ENTREGAS TRIMESTRALES 
DE 1.500,— PTAS. CADA UNA. 


PRECIO TOTAL DE LA SUSCRIPCION - 8.000,— PTAS. 


CUPON DE PEDIDO 

^ El importe lo abonaré: POR 
CON MI TARJETA DE CREDITO 

CHEQUE 

□ 

□ contra i^eem bolso □ 

Ref: CATALOGO DE SOFTWARE 

SOLICITE HOY MISMO 

■ 

1 

Cargue 8,000 pías, a mi tarjeta American Express □ Vi 

sa □ Interbank 


EL CATALOGO DIRECTAMENTE A 

l 

Numero de mi tarjeta 
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28020 MADRID 

O EN LOS CONCESIONARIOS IBM 
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NUEVOS 

COMANDOS 

DEL SPECTRUM128 K 



mmMm e las 32 K de 
ROM del 128 
:SwiÍÍÍSÍ!Í^: : í:v: : : : : (en realidad 
EPROM), 16 
son básicamente una copia de la 
del Plus (o del 48 K o del 16 K), 
mientras que las otras 16 imple- 
mentan un nuevo editor, el sistema 
de paginación, los mensajes de 
error en castellano y algunos co¬ 
mandos adicionales que podemos 
disfrutar desde tres modos de edi¬ 
ción diferentes. 

Cuando se inicializa el ordena¬ 
dor, aparece el copyright^ de Sin¬ 
clair y la palabra «ESPAÑOL». Si 
pulsamos cualquier tecla en el 
modo COMANDO, con el cursor 
en la parte baja de la pantalla y so¬ 
bre una línea en INVERSE que 
nos indica si estamos en modo 


MAYUSCULAS, GRAFICO o 
EXTENDÍDO. Podremos utilizar 
el teclado numérico (y también el 
principal) como si de una calcula¬ 
dora se tratase, és decir, tecleando 
directamente 5-3 obtendremos 
como resultado 2, y si continua¬ 
mos con *1 aparecerá un hermoso 
14 en pantalla (lo de «hermoso» es 
una forma de hablar, el juego de 
caracteres es idéntico al del 48 K). 

Podremos también desde este 
modo disfrutar de todos los nuevos 
comandos tecleándolos directa¬ 
mente, letra a letra y en mayúscu¬ 
las (para mayor comodidad algu- 


Cuando ya muchos han 
adquirido la última 
novedad de 

Sinclair-Investrónica y 
parece causar entre sus 
usuarios, cualquier 
reacción excepto la 
indiferencia, es hora de 
sentarse a observar 
detenidamente lo que nos 
ofrece de positivo su 
sistema operativo 
respecto al del Spectrum 
Plus. 


nos podrán ser reducidos hasta el 
límite de que bastará con teclear la 
inicial). Podremos encadenar va¬ 
rios comandos (con «:»), pero, en 
este modo, la línea resultante en 
ningún caso podrá superar los 32 
caracteres. 

Disponemos de la posibilidad de 
renumerar las líneas BASIC me¬ 
diante el comando NUMERO (o 
N), que debe ir seguido de dos va¬ 
lores separados por una coma: el 
primero es el que te daremos a la 
primera línea, y el segundo es el 
«paso» entre líneas. Esto renume¬ 
rará sin problemas los GOTOs y 
GOSUBs normales, pero ignorará 
los que contengan variables u ope¬ 
raciones aritméticas. 


El comando BORRAR (o B) re¬ 
sultará útil si queremos eliminar 
bloques BASIC. Deben seguirle 
dos parámetros, la primera y la úl¬ 
tima línea a borrar, separados por 
una coma. 


Pseudoprocesador 
de textos 


El comando EDIT (o E) puede 
actuar de dos formas. Si le sigue un 
espacio y una variable alfanumérj- 
ca, se pasa al modo de edici ón de 
textos, apareciendo en 
pantalla el contenido de 
esa variable , que podre¬ 
mos modificar a nues¬ 
tro antojo; tanto des¬ 
plazándonos y bo¬ 
rrando carácter a ca¬ 
rácter. palabra a pa¬ 
labra, por líneas o 
por parra fos, 
como sustituyen¬ 
do o insertando 
texto, con o sin 
sangrado auto¬ 
mático. Po¬ 
dremos salir 
de este modo 
pulsando la 
tecla 

CMND o 
EDITAR, 
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e imprimir e! texto o salvarlo en 
cinta como una matriz de datos. 
Por ejemplo, si estábamos escri¬ 
biendo en aS bastará LPRINT a$ o 
SAVE “nombre” a$(). Si tenemos 
un texto en alguna variable, hay 
que poner cuidado en salvarla en 
cinta o disco RAM (más adelante 
explicaremos lo que es esto) antes 
de hacer CLEAR, RUN o crear 
una variable con el mismo nom¬ 
bre, pues sino perderíamos todo lo 
hecho. 

Un editor BASIC 
más versátil 

Si el comando EDIT va seguido 
de un número, se pasa el modo de 
acción de líneas BASIC, con el 
cursor situado en el comienzo de la 
línea especificada (por omisión la 
primera) o la inmediata superior. 
También se entra en este modo 
pulsando las teclas ENTER y EDI¬ 
TAR. Podremos desplazamos por 
las líneas en horizontal, vertical, 
carácter a carácter o línea a línea, 
borrando e injertando lo que que¬ 


na de las 
mayores virtudes 
del 128 es que 
nos permite por 
medio del comando 
SPECTRUM hacerle 
olvidar que tiene 
RAM y ROM extra y 
que se comporte 
como un Plus 

remos. Cuando pasamos de una lí¬ 
nea a otra se controla la sintaxis de 
la que abandonamos y se nos avisa, 
si hay algún error, con un simpáti¬ 
co bug. 

Pulsando ENTER en este modo, 
el editor abrirá un hueco entre las 
líneas, donde podremos introducir 
comandos directos (no incluidos 
NUMERO, BORRAR o EDIT). 
Cabe destacar que si tecleamos va¬ 
rios comandos seguidos y separa¬ 
dos por «:», automáticamente co¬ 
menzará cada uno de ellos una 


nueva línea, con lo que el resulta¬ 
do es una mayor claridad en los lis¬ 
tados. Asimismo, aunque teclee¬ 
mos los comandos sin dejar espa¬ 
cios entre sus componentes (p. e,, 
10FORNN^0TO9STEP3), apare¬ 
cerán en los listados perfectamente 
presentados (es decir: 10 FOR N=0 
TO 9 STEP 3). 

Es posible abandonar este modo 
y pasar a la parte baja pulsando las 
teclas CMND o EDITAR, pero si 
lo hacemos después de haber reto¬ 
cado una línea y antes de que ésta 
haya sido reconocida (para lo cual 
habremos de salir de ella), las mo¬ 
dificaciones realizadas no serán to¬ 
madas en cuenta. 


Comando 
SPECTRUM, 
disco RAM y RS232 


Una de las mayores virtudes del 
128 es que nos permite, por medio 
del comando SPECTRUM, hacer¬ 
le olvidar que tiene RAM y ROM 
extra y que se comporte como un 







Plus (salvo algún detalle, como los 
mensajes de error que seguirán en 
castellano). Es esta propiedad la 
que lo haces compatible con la 
mayor parte del software disponi¬ 
ble para Plus (o 48 K o 16 K). 

Debido a lo molesto de los siste¬ 
mas de paginación de memoria, el 
BASIC del 128 seguirá disponien¬ 
do sólo de 48 K RAM, las 80 K. ex¬ 
tras podrán ser utilizadas para co¬ 
rrer programas en código máquina 
o desde el BASIC como disco 
RAM. Este es un sistema de alma¬ 
cenamiento de datos ultra-rápido, 
pero con un grave inconveniente: 
los datos se pierden en cuanto se 
desconecta la alimentación. Aun 
así, resulta muy útil para determi¬ 
nadas aplicaciones. Los comandos 
que acceden a él son iguales a los 
del cassette pero seguidos por el 
signo «i». Serán válidos por tanto: 

SAVEi “nombre” UNE 10 
LOADi “nombre” CODE 
50000,100 

SAVEÍ “nombre” SCREENS 
MERGEi “nombre” DATA a$<) 

El comando VERIFY no es en 
realidad necesario, pues este tipo 


de almacenamiento es tan fiable 
como el posible proceso de verifi¬ 
cación, pero hemos comprobado 
que lo admite, aunque no realiza 
su cometido e incluso puede llegar 
a colgar el sistema. 

Para hacer un listado de los fi¬ 
cheros contenidos en el disco 
RAM podremos utilizar CAT¡, y 
para borrar cualquiera de ellos ser¬ 
virá ERASE! “nombre”. 

Podremos conectar el ordenador 
con cualquier impresora compati- 


ebido a lo 
molesto de los 
sistemas de 
paginación de 
memoria, el BASIC 
del 128 dispone sólo 
de 48 K. Las 80 K 
restantes pueden 
utilizarse desde 
código máquina 




ble RS232. Para ello existe el co¬ 
mando FORMAT «P»; que debe ir 
seguido de la velocidad en baudios 
con que opera la impresora. El ca¬ 
nal 3 queda ínicialmente abierto al 
acceso RS232, por lo que toda la 
salida que le afecte lo hará por 
éste. 


PLAY o la forma 
de hacer mucho 
ruido 


Sin duda el comando más com¬ 
pleto de los que nos ofrece de no¬ 
vedad el 128 es PLAY. Tiene que 
ir seguido de una a tres cadenas o 
variables alfanuméricas separadas 
por comas, cada una de las cuales 
corresponde a uno, dos o tres de 
los seis canales de sonido disponi¬ 
bles. En ellas podremos especificar 
frecuencias, octavas, duraciones, 
ligaduras, volúmenes, envolventes, 
velocidades de ejecución, repeti¬ 
ciones, comentarios, etc. Aunque 
resulte algo complicado controlar 
todas estas opciones a quien, de 
por sí, entienda poco de música, 
este comando permitirá que los 
programadores creativos dispon¬ 
gan de un buen repertorio de me¬ 
lodías y efectos sonoros. 

Otro de los puntos fuertes de 
este comando es que permite con¬ 
trolar, por medio de la misma, sali¬ 
das que el RS232, cualquier ins¬ 
trumento electrónico que posea 
MIDI (Myéical Instruments Digi¬ 
tal Intérface). La mayoría de los 
sintetízadores y cajas de ritmo lo 
tienen, por lo que podremos hacer 
que interpreten melodías escritas 
en el ordenador. 

En resumen, aunque se podría 
haber de'purado algo más el diseño 
de este «hijo español» de Sinclair, 
las modificaciones y añadidos se 
agradecen, y llenan algo el hueco 
que dejaba el Spectrum y explota¬ 
ban los MSX, Commodore o Alas¬ 
trad. Esperemos que Investrónica 
aproveche que el nuevo sistema 
operativo reside en EPROM para, 
sin perder ¡a compatibilidad, limar 
los pequeños bugs e ir mejorando 
esta ampliación del operativo más 
amado, odiado y destripado de la 
historia de los ordenadores domés¬ 
ticos. 







Mfespectrun 


10 LET tjul=0: LET tju2=0: GO 
SUB 5100 

14 INK 6: PAPER O; BORDER O: C 
LS 

15 GO SUB 9000 

20 INK 6: CLS 

22 LET ronda=0 

25 PRINT AT 6,8;"ELIGE OPCION" 

30 PRINT AT 12,2;"2. DOS JUGA 
DORES" 

32 PRINJ AT 13.2;"3. JUEGAS C 
ONTRA EL ORDENADOR" 

35 IF INKEY$="" THEN GO TD 35 

36 BEEP .02,68 

37 IF INKEY$="3" THEN LET nju 
=3: GO TO 40 

38 IF INKEY*="2" THEN LET n_iu 
-2: GO TO 40 

39 Gü TO 35 

40 LET tur=1 

60 IF INKEYÍO"" THEN GO TO 6 
O 

61 IF nju=2 THEN GO TO 99 

62 CLS 

65 PRINT AT 6,8;"ELIGE OPCION" 

66 PRINT AT 12,2;" NIVEL DE D 
IFICULTAD (1-3)" 

72 IF INKEY4¡="" THEN GO TO 72 

74 BEEP .02,68 

7B IF INKEY4>"O" AND INKEY$<"4 
" THEN LET diT=VAL INKEY$: GO T 
O 98 

80 GO TO 65 


Reunión K 


Sin otro propósito que el pasar un buen rato 
intentando derrotar al adversario (humano o 
Spectrum), Reunión K es un juego de lógica y 
estrategia con una magnífica presentación. 
Entre sus características figuran: 

• Gráficos tridimensionales 

• Sonido 

• Tres niveles de dificultad 

• Marcador multipartidas 

• Instrucciones incorporadas 

El jugador que consiga el último encuentro 
entre canguros (el nombre del juego significa 
precisamente reunión de Kanguros) se 
proclamará ganador. 

iixi /rm J. J. Urios 



























98 IF INKEYÍO"" THEN GD TO 9 

8 


99 

CLS : 60 

SUB 

5000: 

FRINT 

AT 

9,0; 

tjul; 

t ju2 



100 

IF nju=2 

AND 

tur=l 

THEN 

GO 

SUB 

a 

10QÜ: GO 

SUB 

2000: 

GO TO 

10 

110 

IF nju=2 

AND 

tur=2 

THEN 

GO 

SUB 

fi 

2000: GO 

SUB 

ÍOOO: 

GO TO 

ÍO 

\J 

120 

IF nju=3 

AND 

tur = l 

THEN 

GO 

SUB 

1000: GO 

SUB 

3000: 

GO TO 

10 


--- -- VVVV> 

o 

130 G0 SUB 3000: GG SUB 1000: G 
a TG 100 

1GGO LET opc=l: LET ord=0: G0 SU 
B 4000: RETURN 

2000 LET opc=2: GG SUB 4000: RET 
URN 


3000 

3001 
3005 
3010 
3015 
3020 


REM tirada de ordenador 
LET randa=ronda+l 
LET opc=2: LET ord=l 
DIM g(3): DIM r(8) 

LET eq=0: LET alt=0 
FOR n=l TO 8 


3026 IF alt=t(n,3) 
eq+1: LET r<eq)=n 

3027 IF alt<t(n,3) 
=t<n,3>: LET eq=l: 
3030 LET x=t(n,3): 


THEN LET eq= 

THEN LET alt 
LET r(eq)=n 
IF x >3 THEN 


LET g<3>~g(3)+l: LET x=x-4 


3040 IF :< >1 THEN 
1! LET x =x-2 
3050 IF x >0 THEN 
1 

3060 NEXT n 
3070 LET y=0 


LET g <2)=g(2) + 
LET g(1)=g(1)+ 


3080 FOR n=l TO 3: IF g(n)<>2*IN 
T <g(n>/2) THEN LET y=y+n+(n=3) 
3085 NEXT n 


3090 IF yOG AND ronda>iO-di-f #3 
THEN GO TO 3120 


3100 LET ca=r(1+INT,(RND*eq>): L 
ET av=l+INT <t<ca,3)*RND>: GO SU 
B 4000: GO TO 3999 
3120 FOR n=1 TO 8: LET r(n)=n: N 
EXT n 

3125 F8R n=l TO 8 

3130 LET rnd=l+lNT <RND*<9-n>) 

3135 LET ca=r(rnu) 
















3140 LET r(rnd)=r(9-n) 

3142 IF tíca,3>=0 THEN G0 TO 32 
20 

3145 LET guar=t(ta,3) 

3150 FOR m=l TÜ tica,3) 

3170 LET tíca,3)=t(ca,3)-m 

3175 LET y=0 

3180 68 SUB ^500 

3190 LET t íca,3)=guar 

3195 BEEP .003,17: PRINT AT 11,2 

6; INK m+1;"PIENSO" 

3200 IF y=0 THEN LET av=m: GO T 

O 3230 

3210 NEXT m 

3220 NEXT n 

3230 PRINT AT 11,26;" 

3240 GO SUB 4000 

3499 RETURN 

3500 DIM g(3): FOR k=i TO 8 
3510 LET x=t<k,3>S IF x >3 THEN 
LET g(3)=g(3)+l: LET x=x-4 

3520 IF x>l THEN LET g(2)=g(2)+ 
1: LET x=x-2 

3550 IF x >0 THEN LET g<l)=g(l)+ 

1 

3560 NEXT k: LET y=0 
3580 FOR k=1 TO 3; IF g(k)<>2*IN 
T <g(k)/2) THEN LET y=y+k+(k=3) 
3590 NEXT k 

3999 RETURN 

4000 PRINT INK opc+4;AT (opc=l> 
+(opc=2)*14,<opc=i)+(opc=2>*22; 
INVERSE 1; FLASH 1;"JUGADOR "; op 
c 

4010 PRINT AT <opc=l)*2+(opc=2>* 
15,(opc=l)+<opc=2)*22; INK opc+4 
;"CASILLA "; FLASH 1;"?";CHRÍ 8; 
4015 LET elo=0 

4020 LET mí=INKEYÍ: IF ord=l THE 
N LET mí=STRí ca 
4022 LET clo=clo+ls IF c1o=30 TH 
EN LET elo=0: BEEP .02,RND*-20 
4024 IF mí="" THEN GO TO 4020 
4030 BEEP .002,44 

4040 IF mí< M l" OR mí>"8" THEN G 
0 TO 4020 

4050 IF t(VAL mí,3>=0 THEN PRIN 
T INK opc+4;AT 21,O;"CASILLA "; 
mí;" BLOQUEDA. ELIGE OTRA": BEEP 
.5,0: BEEP .09,-10: BEEP .3,-2: 
GO TO 4000 

4060 LET ca=VAL mí: PRINT mí 
4070 PRINT AT 21,0;" 

ll 

4075 IF INKEYÍO"" THEN GO TO 4 
075 



4080 PRINT AT <opc=l>*3+<opc=2>* 
16,(opo=l)+(ope=2)*22; INK ape+4 
;"AVANCES "; FLASH l;"?";CHRí 8; 
4090 LET mí=INKEYí: IF ord=l THE 
N LET mí=STRí av 

4095 LET clo=clo+l: IF clo=30 TH 
EN LET elo=0: BEEP .02,RND*-20 
4097 IF mí="" THEN GO TO 4090 
4100 BEEP .002,44 

4105 IF míVÓ" DR mí<" 1" THEN G 
O TO 4080 

4110 IF t(ca,3)<VAL mí THEN PRI 
NT INK opc+4;AT 21,0;"NO PUEDE 
AVANZAR EN CASILLA ";ca: 

BEEP .5,0: BEEP .09,-10: BEEP .3 
,—2: GD TO 4000 

4120 PRINT mí: LET av=VAL mí 

4121 PRINT INK opc+4;AT (opc=l) 
+ (opc=2)* 14, Copc=l> + (opc=2)*22;" 
JUGADOR ";opc 

4130 FOR 1=1 TO av 

4140 LET cic=l: GO SUB 6000 

4145 LET xan=x: LET yan=y 

4150 IF opc=1 THEN LET t<ca,l)= 

tíca,11+1 

4155 IF opc=2 THEN LET t(ca,2)= 
t(ca,2)-l 

4160 LET cic=l; GO SUB 6000 
4165 GO SUB 6500 
4170 LET cic=2: GO SUB 6000 
4180 NEXT 1 

4190 LET t(ca,3í=t<ca,3)-av 
4200 IF t(ca,3)=0 THEN LET ncab 
lk=ncablk+l: GO SUB 8000 
4210 IF ncablk=8 THEN GO TO 700 
O 

4999 RETURN 

5000 DIM t(8,3) 

5005 LET ncablk=0 

5020 FOR n=7 TO O STEP -1 
5025 LET t(n+1,1)—1 







5030 LET t(n + 1,2)=8 
5035 LET t(n+1,3)=6 
5040 FOR m=*0 TO 7 

5050 IF n< >0 AND n< >7 THEN PLOT 
3+n*16+m*16,39+n*16: DRAW 12,0: 
DRAW 8,8: DRAW -12,0: DRAW -tí, - 

8 

5060 IF n=0 THEN PRINT AT 15,1 + 
m*2; M AT 16,l+m*2?" ; INVER 

SE 1;AT 18,m*2;m+l 

5065 IF n=7 THEN PRINT INK 5;A 
T l,15+m*2;" "; AT 2, 15+m#2? " " 
;AT 0,15+m*2; INVERSE l:m+l 
5070 NEXT m 
5090 NEXT n 

5094 INK 5: PLOT 0,174: DRAW 86, 
O: DRAW 0,-40: DRAW -86,0: DRAW 
0,40 

5095 PLOT 2,172: DRAW 82,0: DRAW 
0,-36: DRAW -82,0: DRAW 0,36 

5096 INK 6: PLOT 168,70: DRAW 86 
,0: DRAW 0,-40: DRAW -86,0: DRAW 

0,40 

5097 PLOT 170,68; DRAW 82,0: DRA 
W 0,-36: DRAW -82,0: DRAW 0,36 

5099 RETURN 

5100 RESTORE 5200 

5105 FOR n=0 TO 31: READ a: POKE 
USR "a"+n,a: NEXT n 

5199 RETURN 

5200 DATA 0,20,25,26,58,206,31,1 
15 

5210 DATA 142.54,127,63,26,114,2 
04,24 

5220 DATA 0,36,21,26,28,72,41,62 
5230 DATA 47,90,247,255,245,93,8 
9,204 

6000 LET y=íopc=l)*t(ca,1)*2+(op 
c=2)*t(ca,2>*2-l 
6010 LET ;<=ca*2-l 

6020 LET x=x +(opc=l)*2*(8—t(ca,1 
))+(opc=2)*2*(8-t<ca,2 )) 

6040 FOR n-1 TO cic 
6050 PRINT DVER 1; INK opc+4;AT 
y, x;CHRÍ (142+opc*2);AT y+l,x;C 
HRÍ (143+opc*2) 

6055 BEEP .003,RNDÍ60 

6060 NEXT n 

6099 RETURN 

6500 FOR m--l TO 3 

6510 PLDT xan*B+m, 162—yan*8+(n 

6520 DRAW OVER 1; INK opc+4;8.G 

6590 NEXT m 

6594 IF opc = l AND tica,1)=2 THEN 
INK 5: PLOT xan*8+2,166— yan*8: 


DRAW -2,10: DRAW 8.0: DRAW 2,-1 
O 

6596 IF opc=2 AND tica,2)=7 THEN 
INK 6: PLOT xan*8—2,160—yan*8: 
DRAW -6,-9: DRAW 8,0: DRAW 6.9 
6599 RETURN 

7000 PRINT AT 21,0? FLASH 1; ,, GAN 
A JUGADOR "jope: PAUSE 140 
7003 PAUSE 140 

7005 LET tjul=tjul+(opc=l) 

7006 LET tju2^tju2+<opc=2) 

7010 CLS : PRINT AT 8,12;"MARCAD 

□R";AT 12,2;"JUGADOR 1 - ";tjul; 

" JUGADOR 2 - ";tju2 

7015 PRINT AT 15,3;"Pulsa BREAK 

para continuar": PRINT USR 1314 

7020 PAUSE O 

7030 GO TO 20 

8000 LET y=169-t(ca,2)*16 

8004 LET x=16*(ca+8-t(ca,2)>-10 

8020 PLOT INK 2;x+2,y 

8031 PLOT INK 2;x+24,y+ló 

8099 RETURN 

9000 LET ink=5: LET m*=" Do 

s grupos de canguros se avistan 
y corren a encontrarse. " 

9002 GO SUB 9100 

9005 LET m$=" Como se sabe 

no demuestra buen comportamient 
o quien mas prisa tenga." 

9010 GO SUB 9100 

9020 LET m$=" A pesar de la 

impaciencia,hay que procurar qu 
e sea un can-gura de tu grupo e 
1 ultimo en reunirse con su cor 
respondiente tocayo.” 

9030 GO SUB 9100 

9040 LET mí=" Solo de est a 

forma puedes ser considerado gan 
ador. 


9050 GO SUB 9100 

9060 LET mí=" PULSA .ENTER. PAR 
A COMENZAR" 

9070 GO SUB 9100 
9080 PAUSE O 

9099 RETURN 

9100 BEEP .004*RND,20*RND: PRINT 
INK ink;m$< TO 2); 

9110 LET mt=mf(3 TO ) 

9120 IF LEN mí<3 THEN PRINT mí: 

PRINT : LET ink=ink+l: RETURN 
9130 GO TO 9100 

9999 SAVE "Reunión K" LINE 1: GO 
TO 9999 






Programación 

lineal 


loo GO BUB 180: PRINT AT 3,0;"N 
ota: Los coe-f icientes se han de 
introducir con su correspondí en 
te signo. E 

jemplo: 


Dentro de los métodos de resolución de 
problemas de ingeniería, existe uno que es 
particularmente conocido por sus múltiples 
aplicaciones. Nos referimos a la programación 
lineal. Esta rama de la ciencia goza de gran 
aceptación entre los ingenieros y es el tema 
sobre el que versa el programa que nos envía 
Juan Luis Martínez. 

El programa combina tres métodos para la 
resolución de problemas de maximización de 
resultados. La matriz x(n) es el vector de 
variables de decisión, c(n) es el vector de 
coeficientes de recursos, b(m) el vector del 
segundo miembro de tas restricciones y a(m, n) 
es la matriz de los coeficientes de las 
restricciones o matriz tecnológica. 

Los métodos que se combinan son el símplex, 
el dual y un método de programación entera. 


10 PAPER 6: INK O: BORDER 6: 
CLS : PQKE 23609,100 

20 PRINT AT 6,6; PAPER 2; INK 
7; FLASH 1;"PROGRAMACION LINEAL" 
: PLÜT 47,119: DRAW 153,0: DRAW 
0,9: DRAW -153,0: DRAW 0,-9 

30 PRINT AT 10,7; PAPER 2; INK 
7; FLASH l¡"Pare el cassette": 
PLOT 55,87: DRAW 137,0: DRAW O, 
9: DRAW -137,0: DRAW Ó,-9 

40 PRINT AT 14,8; PAPER 2: INK 
7; FLASH l;"Pulse una tecla": P 
LOT 63,55: DRAW 121,0: DRAW 0,9: 
DRAW -121,0: DRAW 0,-9 
50 PRINT AT 20,5; Martínez G 
omez 1985": PAUSE 0: CLS 

60 GO BUB 180: PRINT AT 3,0;" 
Este programa combina el algo¬ 
ritmo del simplex, el dual y un 
método de proqramcion entera 
para resolver problemas cuya - 
expresión general sea:" 

70 PRINT AT 9,0;" Max c ( 1)x1 + 
c Í2> x2+...+c(n)xn" 

80 PRINT AT 11,0;" s.a aíl.lJx 
1+...+a<1,n>xn<~b(1> aí2,l>x 

1+...+a(2,n)xn<=b<2) 


. a <m,l) x 

1 + . . .+a(m,n > xn<=b tm) " 

90 PRINT AT 18,0;’* x(i)>=0 

i=i,2,_,n": GQ BUB 190 


Max -xíl)+2x(2> 

s.a -x(l)+x<2)<=2 
3x (1) —x í 2) < = 1 

x(1> >=0, xÍ2)>—0" 

110 PRINT AT 15,0;" c<l)=-l b 

(1)= 2 a í1,1)=-1 c<2)= 2 b 

<2> = 1 a (1,2) = 1 
a(2, 1) = 3 

a <2,2)=—1": GO SUB 190 
120 GO SUB 180: PRINT AT 5,0;" 
Al aplicar este método apare¬ 
cen n+m soluciones,desde la n+1 
hasta la n+m son las denomina¬ 
das variables de holgura, que - 
corresponde una por cada res— 
triccion. 

Al completar cada restricción - 
con una nueva variable,estas ya 
no se cumplen como restriccio¬ 
nes de desigualdad, sino como — 
restricciones de igualdad,": GO 
SUB 190; GO TO 200 
130 1NPUT "Deseas instrucciones 
ts/n) ? ";at 

140 IF a$="s" THEN 60 TO 60 
150 IF a*<>"s" THEN GO TO 200 
180 PRINT AT 1,6; PAPER 2; INK 
7; FLASH 1;"PROGRAMACION LINEAL" 

: PLOT 47,159: DRAW 153,0: DRAW 
0,9: DRAW -153,0: DRAW 0,-9: RET 
URN 

190 PRINT AT 20,8; PAPER 2; INK 
7; FLASH l;"Pulse una tecla": P 
LOT 63.7: DRAW 121,0; DRAW 0,9: 
DRAW -121,0: DRAW Ó,-9: PAUSE Os 
CLS : RETURN 

199 REM *** entra datos *** 

200 INPUT "Numero de incógnitas 
n=";n: PRINT "Numero de incogni 

tas n=";n' ? "Correcto ? <s/n>": P 

AUSE Os CLS : IF INKEY$="n" THEN 
GÜ TO 200 

210 INPUT "Numero de restriccio 
nes m=";m: PRINT "Numero de rest 
ricciones m=";m;’’"Correcto ? ís 
/n)": PAUSE Os CLS : IF INKEYÍ—" 
n” THEN GO TO 210 









220 IF m<2 THEN PRINT AT 10,0; 
11 El numera de ecuaciones m ha 
de se mayor o iquai que 2 
(m>=2).": PAUSE 300: CLS : G0 
TO 210 

230 DIM a <m,n): DIM cín>: DIM b 
(m) 

240 PRINT " Introduce coe-ficie 
ntes de" - 11 recursos; c(n>." 

250 FOR j=l TQ n 

260 INPUT ("c(”j ; c í j ) 

270 NEXT j 

280 CLS : PRINT "Introduce cde 
ficientes segundo"” "miembro re 
stricciones; bím).' 1 

290 FOR i=i TQ m 

300 INPUT < "b i b <i ) 

310 NEXT i 

320 CLS : PRINT " Introduce cd 
eficientes""técnicos; a(m,n> 

II 

330 FOR 1=1 TO m: FOR i=l TO n 

340 INPUT ( i ; " , ";];")=»"> ;a 

(i , j > 


"c<"; j5 

Para co 
Cualqui 
1 : PAUSE 


INPUT 


350 NEXT j: NEXT i 
360 CLS : PRINT PAPER 7;" Coef 
icientes de recursos c ín): ”: PR 

INT 

370 FOR i=i TO n: PRINT "c<" ;j; 
" > =’■; c: < _, > = NEXT j 
380 PRINT *0; PAPER 7;" Para co 
rreqir errores pulse c Cualqui 
er otra para seguir ": PAUSE 
O 

390 IF INK£Y#="c" THEN INPUT " 
Numero coeficiente erróneo ";j: 
INPUT ("Introduce nuevo coe-ficie 
nte c (": .i ;")=“> ;c (j) : GO TÜ 

360 

400 CLS : PRINT PAPER 7; 11 Coe-f 
ici entes de recursos b(m>: PR 

INT 

410 FOR i=l TO m: PRINT "b<";i; 
")=“;b(i)s NEXT i 
420 PRINT *0; PAPER 7;" Para co 
rregir errores pulse c Cualqui 

er otra para seguir F'AUSE 

O 


erróneo 


Para co 
Cualqui 
: PAUSE 


t 















































430 IF INKEY$="c" THEN INPUT " 
Numero coe-f i cíente erróneo ” ; i : 
INPUT í 11 Introduce nuevo coe-f ície 
nte b í í tí (i ) s BOTO 

400 

440 CLS : F'RINT PAPER 7;” Coe-f 
icientes técnicos a(m,n): PR 

INT 

450 FOR 1=1 TO m: FOR j=l TO n: 
PRINT "a( i ; " , " ; j a £ i , j ) : 

NEXT jí NEXT i 

460 PRINT “O; PAPER 7;" Para co 
rregir errores pulse c Cualqui 
er otra para seguir *': PAUSE 
O 

470 IF INKEY$="c" THEN INPUT " 
Subíndices coe-f ici ente erróneo '* 

,i,j: INPUT ("Introduce nuevo co 
e-Fici ente a (" ; i ; ", " ; j; "> =" ) ; 

a <i,j); GO TO 440 
480 GO SUB 980 

499 REM *#* tabla inicial *** 

500 DIM s(m+1,m+n + 1) 

510 FOR i=1 TO m+1: FOR j=l TO 
n+m+1 

520 IF i <m+l AND j<n+l THEN LE 
T s(i,j)=a(i,j) 

530 IF i < m+ i AND (n<j<m+n+l) AN 
D j-i=n THEN LET s<i,j)=l 
540 IF j=m+n+1 AND i<m+l THEN 
LET s(i,j)=b(i) 

550 IF i=m+l AND j<n+l THEN LE 
T s<i,j)=—c(j) 

560 NEXT j¡ NEXT i 
590 LET cs=0 

599 REN #** algoritmo #** 

600 FOR í=1 TO m+n 

610 IF s(m+1,j)<0 THEN GO TO 1 
000 

620 NEXT j 

630 FOR i=l TO m 

640 IF s(i,m+n+1)<0 THEN Gü TO 
2000 

650 NEXT i 
655 60 TO 900 
660 DIM i< (n+m) 

670 FOR j=l TO m+n: LET cont=0; 
LET contl=0 
680 FOR i=1 TO m+1 
690 IF s(i,j)=l THEN LET cont= 
con t +1: LET -F = i 

700 IF s(i,j >=0 THEN LET contl 
=cont1+1 
710 NEXT i 

720 IF cont=l AND contl=m THEN 
LET x <j>=s<*,m+n+t) 


730 NEXT j 

740 CLS i PRINT AT 0,0; PAPER 7 
; 11 Las soluciones al problema qu 
e me ha planteado son : 

PRINT 

750 FOR i=l TO n+m 

760 PRINT TAB 3; "x ( " ; i ; " > =" ; >: (i 

) 

770 NEXT i 

780 PRINT : PRINT PAPER 7; 11 El 
valor de la -función objetivo es 

■I . 

■ 

PRINT : PRINT TAB 8;s(m+1,m+n+1) 
785 60 SUB 950 

790 CLS : PRINT PAPER 7;" P 

ara ver ultima tabla pulse t P 
ara empezar pulse e P 

ara terminar pulse -f P 

ara p. entera pulse p 


PAUSE 0 


800 
□ TO 

IF 

130 

INKEY$= n e" 

THEN 

CLS : G 

810 

IF 

INKEY$= ll -f 11 

THEN 

STOP 

820 

IF 

INKEY$="t" 

THEN 

GO TO 8 

40 

825 

IF 

INKEY$="p" 

THEN 

GO TO 3 

000 

830 

IF 

INKEY$< >"e 

” OR 

INKEYíO" 


-f" OR INKEY$<>"t" THEN GO TQ 90 
O 

840 CLS : PRINT AT 0,0; PAPER 7 
;" Ultima tabla: 

PRINT 

850 FOR i=l TO m+1: FOR j=l TO 
m+n+1 

860 PRINT TAB 3;“s<";i;",";j;") 
= ";s(i,j > 

870 NEXT jí NEXT i 
880 GO SUB 950 
890 GO TO 790 

900 LET contl=0: FOR j = 1 TO m+n 
910 IF s(m+1,j)=0 THEN LET con 
tl=cont1+1 
920 NEXT j 

930 IF contl>m THEN CLS : PRIN 
T AT 10,0;" El problema posee mu 
1 ti pies so- luciones. He calcula 
do una de ellas,": GO SUB 950 
940 GQ TO 660 
950 PRINT A 0; PAPER 7;" 

Pulse una tecla ": PAUSE 

0: RETURN 

960 IF cs=2 THEN CLS : PRINT A 
T 9,O;"No puedo continuar ni api 
icando el algoritmo de simples 
ni el algoritmo dual, la soluci 
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on es ilimitada.": GO SUB 950: 

60 TO 790 
970 RETURN 

9B0 CLS : PRINT AT 9,5; PAPER 2 
; INK 7; FLASH 1;"Realizando ope 
raciones": PLÜT 39,95: DRAW 177, 
0: DRAW 0,9: DRAW -177,0: DRAW O 
p-9 

990 PRINT AT 11,7; PAPER 2; INK 
7; FLASH 1;"Espere 'un momento" 

: PLOT 55,79: DRAW 145,0: DRAW O 
,9; DRAW -145,0: DRAW 0,-9: PRIN 
T AT 20,5“ Martínez Gómez 1985 

II 

995 RETURN 

999 REM *** simple* **# 

1000 LET min=sím+1,1>: LET c = l 

1010 FOR j=2 TQ m+n 

1020 IF min>s(m+l,j) THEN LET m 

in=stm+l,j)í LET c=j 

1030 NEXT j 

1040 LET 5=0: FOR i=l TO m 
1050 IF s(i,c)>0 THEN LET minl= 
s<i,m+n + 1)/s(i,c): LET s=s+l: LE 
T í=is LET i =m 
1060 NEXT i 

1070 IF s=0 THEN LET cs=cs+l: 6 
O SUB 960: GO TO 2000 
1080 FOR i=2 TO m 

1090 IF s(i,c)<=0 THEN 60 TO 11 

10 

1100 IF síi,m+n+1)/s(i,c)<minl T 
HEN LET minl=s(i,m+n+1>/s(i,c>: 

LET f=i 
1110 NEXT i 
1120 LET ope=s(f, c) 

1130 FOR j=l TÜ m+n+1 

1140 LET síf,j)=stf,j)/ope 

1150 NEXT j 

1160 FOR i=l TO m+1 

1 Í70 IF iO-f THEN LET ope^ísü 

, c)*s(f,c) ) 

1180 IF i=T THEN GO TO 1220 

1190 FOR >=1 TO m+n+1 

1200 LET s (i , j ) =s (-f, j > *ope+s íi , j 

) 

1210 NEXT j 

1220 NEXT i: LET cs=0 

1230 GO TO 600 

1999 REM **# dual *** 

2000 LET min=s(1,m+n+1): LET -f = 1 
2010 FOR j=2 TO m 

2020 IF mín>stj,m+n+1) THEN LET 
min=s(j,m+n+1): LET +=j 
2030 NEXT j 

2040 LET s=0: FOR i=l TO m+n 


2050 IF s < -f , i > <0 AND s (m+1, i ) >=0 
THEN LET minl=ABS (s(m+1,i>/sí 
-f , i > ) : LET 5 = 5+1 : LET c=i : LET i 
=m+n 

2060 NEXT i 

2070 IF THEN LET cs=cs+i: G 

Ü SUB 960: GD TO 1000 
2080 FOR i=2 TO n 

2090 IF s íf,i)>=0 THEN 60 TO 21 
10 

2100 IF ABS (s (m+1, i )/s (t , i ) Xmi 

ni THEN LET minl=ABS (s(m+l,i>/ 

s Cí,i)): LET c=i 

2110 NEXT í 

2120 GO TO 1120 

2999 REM tft* p. entera *#* 

3030 CLS ; GO SUB 980 
3040 DIM r(m) 

3050 FOR 1=1 TO m 

3060 LET r(i>=s(i,m+n+1Í-INT s(i 
, m+n+1) 

3070 NEXT i 

3080 LET max =r(1)s LET f = 1 
3090 FDR i=2 TO m 

3100 IF max<rii! THEN LET max=r 

(i>: LET f=i 

3110 NEXT i 

3120 LET m=m+1 

3130 DIM a (m+1,m+n+1) 

3140 FOR j = l TO m+n—1 

3150 IF s(f,j)OINT s(t-j) AND s 

(f,j)ÍO THEN LET a í m, j > =-< 1+s <-F 

3160 IF s(-f, j)OI NT s(-f,j) AND s 
í-f,j)>0 THEN LET a (m, j > =-s Ü , j ) 
3170 NEXT j 

31B0 LET aím,m+n)=l: LET a(m,m+n 
+1)=—ma* 

3190 FOR i=l TO m-1 
3200 FOR j=i TO m+n-1 
3210 LET a(i,j)=s(i,j) 

3220 NEXT j 

3230 LET a(i,m+n+1>íi,m+n) 

3240 NEXT i 

3250 FOR j=1 TO m+n-1 

3260 LET a C m+1, j > =s (m, ) 

3270 NEXT j 

3280 LET a(m+1,m+n+1)=sím,m+n) 
3290 DIM s ím+1,m+n+1) 

3300 FOR i —1 TO m+1 
3310 FOR i=l TO m+n+1 
3320 LET s<i„j)=a<i,j> 

3330 NEXT j: NEXT i 
3340 60 TO 600 

9000 SAVE "P. Lineal" LINE 10: V 
ERIFY “P. Lineal 5 ' 
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Opti co 


TIÉNDA AL PUBLÍGO ■ i i: 

. EN EL CENTRO DE BARCELONA : : ■ 
HORARIO; d« 10 h a 20 h ININTERRUMPIDO 
SABADOS CERRADO 


Envíos contra reembolso a toda España 
200 ptas, gastos de envío 
En tu domicilio en 3-4 días 


4.000 


S.I.T.I. V.3* 

Base de datos con cálculos. 

Al comprar esta versión abonamos 3000,- ptas. por cual¬ 
quier versión anterior. 

Context V.9* 4.000 

Tratamiento do Textos. 

Funciona con cualquier impresora. 

Acentos graves y agudos. 

Al comprar esta versión abonamos 3.000 ptas. por 
cualquier versión anterior 

Adaptador SITI-CONTEXT 2.500 

Permite pasar información del SITI al CONTEXT, 

M.D.S. - Sistema Operativo para 
Micnodrive 7.000 

Conjunto de nuevos comandos BASIC que permiten Ac¬ 
ceso Aleatorio a Ficheros en Mrcrodríve con un tiempo 
medio de acceso de 4 segundos. 

CONTABILIDAD PIN* 3.000 

Plan contable 200 cuentas 2.000 asientos. 

Hasta 9.000.000.000 Balance con activo-pasivo, cía resul¬ 
tóos. Utiliza et S.QM.D.S- Cualquier impresora SO coi 

Kit Utilidades Discovery 1 3.000 

10utilidades CAT extendido ÜN ERROR. Comparador 
de discos, etc. 

AJUSTE DE CABEZALES 
CASSETTE 

SINTETIZADOR DE VOZ 
MULTI-COPYS (Copys desde 2 cm 
hasta 70 cm.) 

COPY GRISES (F+, SP-800, 

SP-1000, GP-550) 

COPY RS-232 

COPY SERIE RITEMAN F+ 

EDITOR 64 (64 columnas 
en pantalla) 

'Disponible en dieco para Discovery 1 al precio de 
5.000,- ptas. 


2.500 

3.000 

3.000 

2.500 

2.500 

2.500 

2.750 


PIN SOFT, S.A. 

Paseo de Gracia. 11 - Esc. C., 2° 4. a 
Tel. (93) 318 24 53 - 08007 Barcelona 


COMANDO 2.181 

CRITICAL MASS 1.696 

DAM BUSTERS 1.964 

FIGHTING WARRIOR 1.875 

GYROSCOPE 1.696 

HIGHWAY ENCOUNTER 1.696 

OLE TORO 1.875 

RAMBO 1.875 

SABOTEUR 1.696 

SGRIZAM 1.741 

SUPERMAN 2.464 

THE WAY OF EXPLODING FIST 2.054 
WEST BANK 1.741 

Y TODAS LAS NOVEDADES. 

Solicita catálogo. 


Sistema experto de Flores 
de jardín 3.500 

Sistema experto de Minerales 3.500 

APLICACIONES SITI V.3 3.500 

Agenda* Vídeos + Contabilidad domestica +■ Stocks, etc , 
(necesita el SlTt V3) 


interface sonido TV 3,500 

Interface Joystik 2.000 

Joystick Quickshot II 2.600 

l/F Centronics 8.000 

Lápiz óptico+software 4,850 

Interface monitor 3.900 

Cinta virgen 15' 100 

Monitor Ciaegi f. verde 24.000 

Monitor Ciaegi f. ámbar 24.750 

Caja para f2 microdrives 100 

Teclado Saga 1 11.000 

Teclado Saga 3 19.900 

Discovery 1 + diseo Kit 55.000 

Diskettes 3 1/2 714 

Cable impresora Discovery 3.500 

Alimentación ininterrumpida 9.750 

Digitalizador de imágenes 35.000 

Impresora Riteman F+ 71.900 










































































































Cuando los fanáticos de conocer tas cosas por dentro 

abrimos el Spectrum 128, aparte de no sacar nada en claro, 

vemos algunos circuitos integrados que se encuentran en el 

Spectrum de 48 Kbytes. Uno de ellos destaca por su ta¬ 

maño: el AY-3-8912, el músico del 1287 



1 AY-3-8912 se de¬ 
nomina PSG, siglas 
inglesas de Progra- 
mable Sound Gene¬ 
ral or (Generador Programable 
de Sonido) que fue el nombre 
que dio su primer fabricante 
General Instruments, al 
AY-3-8912 y a su hermano 
mayor el AY-3-8910. 

El destino inicial de este cir¬ 
cuito era la generación de efec¬ 
tos especiales en máquinas de 
marcianitos y la producción de 
sonido en órganos electrónicos. 
Posteriormente, ha demostrado 
su utilidad para sonorizar di¬ 
versos ordenadores y actual¬ 
mente, es raro el ordenador 
personal para el que no se haya 
editado alguna vez un artículo 
llamado algo así como «Haga 
música con su XXX». Montaje 
utilizando el GI AY-3 8912». 

La importancia que tiene y 
ha tenido este dispositivo en el 
mundo informático se debe a la 
flexibilidad de su diseño, que 
impide que se quede obsoleto. 

A continuación vamos a des¬ 
cribir (a función de cada una de 
las patas del PSG. 

DA0-DA7: forman el bus de 
datos para comunicarse con el 
microprocesador. Sirven para 
seleccionar el registro de con¬ 
trol a modificar y para enviar o 
recibir su valor, según el proto¬ 
colo que veremos más adelante. 

A8: sirve exclusivamente 
para añadir un bit de identifica¬ 


ción del PSG en sistemas que 
dispongan de más periféricos. 
Para seleccionar el PSG debere¬ 
mos poner A 8 a nivel lógico 
«1» (+5 voltios). 

BDIR, BC2, BC1: estas líneas 
indican al PSG el significado 
del valor puesto en DA0-DA7 
o que se quiere leer de él, según 
la tabla !. De este modo, a cam¬ 
bio de mayor complejidad in¬ 
terna del chip, conseguimos una 
gran simplificación tanto de la 
circuitería exterior como del 
soporte lógico (software) de fun¬ 
cionamiento del equipo. 

IOAO-IOA7: son las líneas 
externas del puerto de entrada y 
salida A, que analizaremos más 
adelante. 

TEST1: Es un punto que uti¬ 
liza el fabricante para compro¬ 
bar el buen funcionamiento del 
PSG antes de ponerlo a la ven¬ 


ta. La única recomendación 
que Genera) Instruments hace 
para su buen funcionamiento es 
que se deje sin conectar a abso¬ 
lutamente nada. 

CLOCK: Entrada de reloj 
tipo TTL, utilizada como base 
de tiempos para la generación 
de tonos, envolventes y ruidos, 

Vcc, Vss: Tensiones de ali¬ 
mentación +5 y 0 voltios, res¬ 
pectivamente. 

Lectura y modificación 
de registros 

Vamos a estudiar ahora 
cómo dar valores a los registros 
y leer. 

Ante todo analizaremos el 
sistema general de escritura en 
el PSG. El sistema será: a) po¬ 
ner el valor a escribir en 



















DA0-DA7; b) poner los valores 
adecuados en BDIR, BC1 y 
BC2 (típicamente BDIR=1, 
BC2=2, y BC 1=1 para escribir 
una dirección y BCM) para dar 
valor a un registro). 

Para leer un valor, habrá que 
poner primero los valores ade¬ 
cuados en BDIR (0), BC1 (1) y 
BC I (1) y a continuación leer el 
dato en DA0-DA7. 

De este modo, el proceso 
completo para dar un valor a 
un registro es a) realizar una 
operación de escritura con 
BC 1=1 y DA0-DA3 con el nú¬ 
mero binario que represente el 
número de registro a modificar. 
A continuación, realizaremos 
otra operación de escritura con 
BC1=0, y DA0-DA7 con el va¬ 
lor a meter en el registro. 

Para leer el valor de un regis¬ 
tro, se deberá hacer una opera¬ 
ción de escritura como la pri¬ 
mera que se realizó para escri¬ 
bir en un registro, y a continua¬ 
ción una operación de lectura, 
leyendo en DA-DA7 el valor 
del registro pedido. 

Generación de tonos 

La generación de tonos se 
realiza mediante dos contado¬ 
res. El primero de ellos toma 
como valor inicial el número de 
12 bits contenido en el registro 
de control de tono del canal co¬ 
rrespondiente (R0 y R1 para el 
A, R2 y R3 para el B, R4 y R5 



El chip 
AY-3-8910 
es el 

responsable 
de las 
increíbles 
posfcildades 
musicales 
del MSX 













Vista superior 


FUNCION 


INACTIVO 


ESCRIBE DIRECCION 


INACTIVO 


LEE ORTO 


ESCRIBE DIRECCION 


INACTIVO 

ESCRIBE DATO 


ESCRIBE DIRECCION 


Canal C 
Test 1 


I0A7 
IOA6 
IOA5 
I0A4 
10A3 
I0A2 
IO A1 
IOAO 


Distribución de las señales en ef AY-3-8912, 



t abla 1: Modos de 
t ni n sfere nci a selecrio nados 
sirgan el estada de Bl)[R. BC I 
y BC2. 


CLK 



Esquema del bloque- base» 


+ 



Esquema dé divisor. 


para el C) y va quitándole 1 
para cada dos ciclos de reloj ex¬ 
terno (CLOCK). Cada vez que 
este contador pasa por 0, vuelve 
a tomar el valor de registro de 
control y genera un pulso. 

Dicho pulso se utiliza como 
entrada para el siguiente conta¬ 
dor, que es de dos bits y por 
tanto puede tomar 4 valores 
distintos (00, 01, 10 y 11). Este 
contador suma i cada vez que 
recibe un impulso. Cuando lle¬ 
ga a 11, repite este valor y luego 
comienza a restar 1 hasta llegar 
a 00, valor que también repite 
para luego comenzar a sumar 1, 
repitiéndose el ciclo hasta que 
se ponga 0 en el registro de con¬ 
trol de tono. 

Si tomamos los dos bits del 
último contador y los utiliza¬ 
mos como entrada de un con- 
versor analógico digital, conse¬ 
guiremos una señal que varía 
periódicamente en el tiempo 
con la frecuencia dada por la si¬ 
guiente fórmula: 

f=—-— 

16*tp 

f- frecuencia de la señal de sali¬ 
da 

fr - frecuencia de reloj 
tp = valor contenido en el regis¬ 
tro de control de tono. En el ca¬ 
nal A, seria R0 + 256* (valor 
contenido en los bits 0 a 3 en 
Rl). 

Así pues, para conseguir una 
frecuencia de aproximadamen¬ 
te 440 Hz (la central del piano), 
habrá que poner en el registro 
de control un valor de 
1789772.5/(16*440) = 254, es 
decir, poner en R0 el valor 254 
y en R1 0. 

Generación de ruido 

La generación de ruidos se 
realiza por un método similar, 
sólo que ahora el valor inicial 
que toma ei contador es el que 
hay en el registro R6, en los bits 
0 ó 4, poniéndose ceros en los 
bits superiores. Con la señal 
que así se genera, se modela la 
amplitud de un generador de 














































registros R1 i y R12, según la 
fórmula: 


T = 256- 


256* RI2 + RI1 
fr 


ruido blanco. Hay que recordar 
un detalle importante: el canal 
de ruido es único, y lo que ha¬ 
cemos es decir (mediante R7, 
como veremos después) en qué 
canales queremos oírlo. 

Generación de 
envolventes 

La generación de envolventes 
de volumen se controla me¬ 
diante dos registros diferentes. 
La forma la controla el registro 
R13 y la duración de la rampa 
los registros R1 l y R12. 

El registro R13 de forma de 
envolvente sólo utiliza los 4 bits 
de menos peso, llamados 
CONT, ATT, ALT y HOLD, 
cuyas funciones son: 

HOLD (Mantener): si está 
puesto a nivel lógico «I», al 
acabar el primer ciclo de varia¬ 
ción de la envolvente, manten¬ 
drá el valor con el que se acabe 
la rampa (volumen máximo en 
caso de rampa ascendente o si¬ 
lencio en caso de rampa des¬ 
cendente). En caso de valer «0» 
la envolvente se repetirá cícli¬ 
camente. 

ALT (Alternancia): en caso 
de que valga «I», se alternan 
rampas ascendentes y descen¬ 
dentes. 


Donde fr es la frecuencia de re¬ 
loj. 

Así, para conseguir que un 
sonido crezca desde el silencio 
hasta el volumen máximo du¬ 
rante 1 segundo, y luego calle 
por completo, habrá que poner 
el valor 4 en R13, el valor 27 en 
R12 y 79 en R11 
El sistema utilizado para ge¬ 
nerar dichas envolventes es 
muy similar al de generación de 
tonos, con algunas diferencias: 

a) El primer contador es de 
16 bits en vez de 12. 

b) El reloj que se introduce en 
el primer contacto no se divide 

A TT (Ataque): si vale «1», la previamente por 2. 
envolvente comenzará con una c) El segundo contador es de 
rampa ascendente, en caso con- 4 bits, lo que genera 16 niveles 
trario empezará con una rampa distintos, y es mucho más com- 
descendente. plicado para poder ser contro- 

CONT (Continuación): si lado por los bits HOLD , ALT, 
vale «1», la forma de la envol- ATT y CONT. 
vente será la definida por el bit d) El convertidor de digital a 
HOLD. Si no, después del pri- analógico no es lineal, como el 
mer ciclo se volverá al estado de los tonos, sino exponencial, 
de silencio. para contrarrestar la respuesta 

La duración de la primera logarítmica de nuestro oído, 
rampa (y de las siguientes, si las Para que un canal quede 
hubiere) viene definida por los afectado por el generador de en- 


El sonido 
se genera 
mediante 
una serie de 
valores que 
se 

almacenan 
en unos 
registros 
determina¬ 
dos 

















volvente, habremos de poner el 
bit 4 de su registro (R8 para el 
canal A, R9 para el cana! B y 
RIO para el canal C) de control 
envolvente a «a». Caso contra¬ 
rio, su volumen será el fijado 
por los bits 0 ó 3 de dicho regis¬ 
tro, que sustituirán a la entra¬ 
da del convertidor D/A de en¬ 
volvente a los 4 bits del segundo 
contador. 

Mezcla final de sonidos 

Hasta ahora hemos visto 
cómo se genera cada parte del 
sonido. Ahora nuestro proble¬ 
ma es entender cómo se unen 
dichas partes para crear el soni¬ 
do definitivo. 

Analicemos, pues, la natura¬ 
leza de lo que queremos oír. 
Nuestra idea principal es perci¬ 
bir un tono base. A este tono 
podemos añadirle un ruido, lo 
que significa SUMARLE un 
ruido. Cuando hablamos de vo¬ 
lumen, nos referimos a un valor 
máximo que pueden alcanzar 
los picos de nuestra señal de 
tono, es decir, se trata de una 
MULTIPLICACION del tono 
más el ruido por la envolvente 
de volumen (o el volumen fijo). 

Los puertos de 
entrada y salida 

Centrándonos en el Z-80, 
que es el microprocesador que 
lleva el Spectrum, hemos de re¬ 
saltar que tiene dos espacios de 
direcciones diferenciados. Uno, 
que funciona más rápido, se de¬ 
nomina clásicamente el espacio 
de MEMORIA. A él se accede 
por medio de los 16 bits del bus 
de direcciones y por la señal de 
control MREQ. Es, pues, un es¬ 
pacio de 65536 lugares posi¬ 
bles. El otro espacio, al que se 
accede por medio de sólo 8 bits 
del bus de direcciones y de la 
señal de control IOREQ, es el 
llamado espacio de E/S. 

Es en este segundo espacio 
donde se sitúan los periféricos. 
Pero existen varios problemas 
graves: ni todos los periféricos 
entienden lo que son las señales 


















































































de control, ni todos se pueden 
conectar a un bus de datos, ni 
todos van tan rápido como el 
procesador, ni todos entienden 
las informaciones en binario. 
Para poder dialogar con este 
tipo de periféricos se inventa¬ 
ron los puertos e/s, que básica¬ 
mente son lugares donde se deja 
un dalo hasta que pueda reco¬ 
gerlo el periférico o hasta que se 
convierta a un formato por él 
comprensible, o donde se reco¬ 
ge un dato cuando el periférico 
ha podido elaborarlo. En sí 
mismos son memorias de pe¬ 
queño tamaño (1 octeto, 1/2 
octeto) que están conectadas a 
dos tuses, el bus de datos del 
microprocesador y el bus del 
periférico, llamado normal¬ 
mente «bus externo». 

Realizada la disquisición fi¬ 
losófica, pasemos a ver el fun¬ 
cionamiento del puerto del 
AY-3-8912, denominado A. 
Los datos intercambiados con 
el periférico se leen y escriben 
en el registro R14 (puerto A). 



■ Una serie de 
registros permiten 
controlar todas las 
funciones 
necesarias 
de sonido 

Este registro sólo puede funcio¬ 
nar de dos modos: o sólo entra¬ 
da o sólo salida. El hecho de 
que funcione en uno u otro 
modo viene determinado por 
unos bits del registro de control 
(R7). 

El registro general de 
control R7 

El registro R7 cumple la fun¬ 
ción de controlar la mezcla de 


ruidos y tonos que se realiza, 
además de fijar la dirección de 
funcionamiento del puerto e/s. 
Para ello está dividido en tres 
bloques según se ve en la figura 
8: TONO, RUIDO y ENTRA- 
DA/SALIDA; los dos primeros 
formados por tres bits (uno por 
canal) y el último por dos bits, 
uno por puerto. 

Los bits 0 a 2 controlan el 
tono de cada canal del modo si¬ 
guiente: si valen «1», en su ca¬ 
nal correspondiente no sonará 
el tono fijado por los registros 
de tono, en caso contrario sí lo 
hará. 

Los bits 3 a 4 controlan el 
ruido. Caso de valer «0», se su¬ 
mará el ruido al tono del canal. 

Los bits 6 a 7 fijan la direc¬ 
ción de funcionamiento del 
puerto. Si uno de estos bits vale 
«1», cada vez que se envíe un 
dato del procesador al puerto, 
éste «memorizará» el valor y lo 
mantendrá en las líneas del bus 
exterior de datos. 

Juan Zarategui 


PROTEJA SU SPECTRUM PLUS CON ESTA 



PRACTICA FUNDA 


A UN PRECIO ESPECIAL 


OFERTA LIMITADA 
Y EXCLUSIVA PARA 
NUESTROS LECTORES 


Aproveche la oportunidad de mantener 
como nuevo su Spectrum Plus 
con esta funda, y beneficíese 
de un 30% de descuento 
sobre su precio normal. 







ttSDE CODIGO MAGUINA 



A veces puede existir la necesidad de 
acceder al intérprete Basic desde una 
rutina en código máquina sin 
necesidad de abandonar ésta. El 
programa de este artículo le permitirá 
realizar esto de forma sencilla, tal y 
como podrá ver con el ejemplo que le 
expondremos. 


El programa, paso a paso 


Esta rutina en código/máquina se basa 
fundamentalmente en la creación de un 
comando Basic para que sea ejecutado, 
introduciéndolo previamente en el área de 
editar (cuyo comienzo está contenido en la 
variable del sistema ’E LINE’). 

Lo primero que realiza es limpiar lo que hay 
por encima del área de edición, incluido el 
espacio de trabajo y la pila del calculador. A 
continuación, reserva espacio para el 


La rutina es plenamente efectiva y útil si se 
llama desde otro programa en código 


Particularidades de la rutina 


comando en el área de editar^y copia en ella 
los códigos que forman el comando, 
contenidos en una tabla. 

El siguiente paso consiste en tratar la 
variable del sistema ’ERR SP’ para que 
pueda efectuarse el retorno a la rutina, 
inmediatamente, se produce una llamada a 
la rutina ROM que evalúa una línea BASIC 
(en la dirección 7050 d.), y al volver, limpia 
las áreas de trabajo y comprueba si se ha 
producido un error, retomando al intérprete 
BASIC si así ha sido. 

Los comentarios del listado fuente en 
ensamblador le informarán con más 
precisión de cada uno de los pasos del 
programa. 














máquina, y una vez resuelta, aquél seguirá 
su curso. De todos modos, no existe ningún 
inconveniente en llegar a ella desde el 
BASIC (RANDOMIZE USR 65000), sobre 
todo si desea comprobar su correcto 
funcionamiento. 

Cuando se accede a ésta, el par de registros 
HL apunta al comienzo de una tabla donde 
están introducidas las órdenes BASIC que se 
desea ejecutar. Por supuesto, deberá 
escribirlas en forma de TOKENS y códigos 
ASCII. Veamos un ejemplo sencillo para 
que lo pueda entender perfectamente. Si 
desea que se ejecute el comando: PRINT 
"N. = X deberá definirlo en la tabla 
mediante pseudomnemónicos DEFB con los 
siguientes datos: (debajo de cada uno de ellos 
figuran los caracteres u órdenes que 
representan). 

245 34 78 46 61 34 59 88 13 

PRINT “ N. = ” ; X 

El valor 13 del final de la serie equivale a 
ENTER y debe introducirse siempre como 
último dato. 

Hay que tener en cuenta que cuando 
representamos números, el Z-80 los 
almacena con un formato binario de 5 bytes. 
Si queremos evitar esto, la función VAL 
puede servirnos, escribiendo los números de 
la forma VAL «número» (ej.: PRINT VAL 
«128»). 


Ejemplo práctico de utilización del programa 


Para que observe de qué forma puede aplicar 
la rutina, hemos colocado en la tabla del 
listado en Ensamblador, los códigos 
pertenecientes a las siguientes órdenes 
BASIC: 

INPUT a$: FOR k=VAL “1” TO LEN a$: 
POKE VAL “29999” + k, CODE a$(k): 
NEXT k: POKE k + VAN “30000”, VAL 
“ 0 ”. 

Supongamos que ha llamado la rutina desde 
su programa en código/máquina. Al 
ejecutarse ésta, entra en funcionamiento el 
comando INPUT. Después de introducido el 
texto, éste se almacena a partir de la 
dirección 30000 (el 0 final es para indicar el 
fin de la cadena). Acto seguido, su programa 
seguirá su curso normal a partir de la 
dirección donde realizó la llamada. 

Orlando Araujo Martín 


PROGRAMA CARGADOR BASIC 

Introduce el código máquina en 
memoria, verifica los datos y realiza una 
pequeña demostración de sus 
posibilidades 


iO DATA 33,49,254,205,240,253 
,207,255,229,205,176,22,42,89.92 

, 1 

20 DATA 130,O,205,25,22,35,235 
,225,1,128,0,237,176.253,203,48, 
254 

30 DATA 253,54,0,255.253,54,10 

1 ars 1 .1 Q-’n 'í'io tt t 04,[ i—i i-j-y 

, 4 ¡ .L. , . , — 1 , -..¡'-i , W r í , ‘ 

7 


40 DATA 115,61,92,205.138,27 
50 DATA 225,225,34,61,92,205,1 


76,22,58,58,92,254, 
201 


194,3,19, 


70 DATA 238,97,36, 58, 235 , 1 07', 6 
1,176,34,49,34,204,177,97,36,58, 
244 

80 DATA 176,34,50,57,57,57,57* 
34,43,107,44,175,9?’36,40,107,41 
,58,243,107,58 

90 DATA 244,107,43,176,34,51,4 
8,43,48,48,34,44, 176,34,43,34, 13 
100 OLEAR 64999; LET X=0: FOR I 
=65000 TO 65127: READ A: POKE I, 
A: LET X=X+A: NEXT 1 
llO IF X' 14340 THEN PRINT "ER 
ROR’EN DATAS”: STOP 
120 REM 
130 REO 
140 REN 

150 REH DEN08TRACION 
160 PRINT "PULSE UNA TECLA RARA 
PONER EN MARCHA EL CODIGO MAQ 
UINA E INTRODUZCA UN TEXTO A CON 
TINUACION": PAUSE O 
180 RANDOMIZE USR 65000 
190 OLE : PRINT “PULSE UNA TECL 
A PARA COMPROBAR SI SU TEXTO SE 
HA ALMACENADO BIEN A PARTIR 
DE LA DIRECCION 30000" 

200 PAUSE O 

300 FOR 1=30000 TO TOOOO-fLEN 
: PRINT I.CHRÍ i PEEK !>: NEXT I 








LISTADO FUENTE EN 
ENSAMBLADOR 

La tabla contiene los códigos de las 
siguientes instrucciones BASIC: INPUT 
a$: FOR K=VAL "1" TO LEN a$: POKE 
VAL "29999" + K, CODEa$ (K): NEXT 
K: PO KE K + VAL "30000 ", VAL "O" 


10 

QRG 

65000 


20 

ent' 

* 


25 

LD 

HL,TEXTO 

(AP 

UNTA AL CODIGO BASIC SITUADO 

EN 

TABLA 




30 

CALL 

CODIGO 

(LL 

AMDA A 

LA RUTINA 



40 

RST 

8 ; 

RETO 

RNO AL 

MODO COMANDO 


50 

DEFB 

255 


60 

CODIGO PUSH 

HL 


70 

CALL 

5808 ; 

USA 

UNA RUTINA ROM PARA LIMPIAR 

BUFF 

ER 




80 

LD 

HL,(23641) 

; APU 

NTA A 

LA VARIABLE 

DEL SISTEMA ’E 

LI NE 1 




90 

LD 

BC, 130 

(RES 

ERVA 130 BYTES EN 

EL BUFFER 

DE E 

D1CI0N 




100 

CALL 

5717 

(LLA 

MA A LA RUTINA ’MAKE ROOM’ 


110 

INC 

HL 


120 

EX 

DE, HL 

(CAR 

GA HL 

EN DE PARA 

EL LDIR 


130 

POP 

HL 

(APU 

NTA AL 

COMIENZO DE LA TABLA 


140 

LD 

BC,128 

(LON 

GITUD 

MAXIMA DEL 

TEXTO 


150 

LD I R 

(CARGA EL 

TEXT 


0 EN EL 

BUFFER DE 

EDICION 


160 

SET 

7, ( IY + 48) 


170 

LD . 

fIY+0),255 

(LI 

MPIA ERRORES ANTERIORES 


180 

LD 

UY+10) , 1 

(ES 

TABLECE 

LA VARIABLE NSPPC A 

LA P 

RI MERA 

SENTENCIA 



190 

LD 

HL,(23613) 

(GU 

ARDA EL 

VALOR DE 

* ERR SP’ PARA 

200 

PUSH 

HL 

; RE 

CUPERARLO MAS ADELANTE 


205 

LD 

HL,VOLVER 


207 

PUSH 

HL 


210 

LD 

(23613),SP 

; C A 


EGA EL STACK POINTEE EN * ERE SP ’ 
220 CALL 7050 ;LL 


AMADA A LA RUTINA DE EVALUACION 
DE LINEAS BASIC 

230 POP HL (SI 

VOLVEMOS AQUI DESECHAMOS ESTE V 
ALOE 

240 VOLVER POP HL i SI 

HAY UN ERROR SE EJECUTA ESTA SU 
BRUTINA 

250 LD (23613),HL 

260 CALL 5808 íLI 

MPIA LOS BUFFERS 

270 LD A,(23610) ;SI 

HA HABIDO UN ERROR EVALUA 1 ERR 
NR ’ 

280 CP 255 iSI 

EL CONTENIDO ES 255 NO HAY ERRO 
R 

290 JP NZ,4867 íSI 

NO,SALTO AL BASIC 
300 RET ;VUELVE AL PRO 

GRAMA QUE LLAMO LA RUTINA 

310 TEXTO DEFB 238 ;INPUT 

525 DEFB 97 ;a 

720 DEFB 36 ;$ 
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955 

DEFB 

58 


6545 

DEFB 

97 

a 

1170 

DEFB 

235 

FOR 

6760 

DEFB 

36 

$ 

1385 

DEFB 

107 

k 

6975 

DEFB 

40 

( 

1600 

DEFB 

61 

— 

7190 

DEFB 

107 

k 

1815 

DEFB 

176 

VAL 

7405 

DEFB 

41 

) 

2030 

DEFB 

34 

11 

7620 

DEFB 

58 

t 

2245 

DEFB 

49 

1 

7835 

DEFB 

243 

NEXT 

2460 

DEFB 

34 

tt 

8050 

DEFB 

107 

k 

2675 

DEFB 

204 

TO 

8265 

DEFB 

58 

: 

2890 

DEFB 

177 

LEN 

8480 

DEFB 

244 

POKE 

3105 

DEFB 

97 

a 

8695 

DEFB 

107 

k 

3320 

DEFB 

36 

$ 

8910 

DEFB 

43 

+ 

3535 

DEFB 

58 

-* 

* 

9125 

DEFB 

176 

VAL 

3750 

DEFB 

244 

FOKE 

9340 

DEFB 

34 

II 

3965 

DEFB 

176 

VAL 

9555 

DEFB 

51 

3 

4180 

DEFB 

34 

H 

9770 

DEFB 

48 

0 

4395 

DEFB 

50 

2 

9985 

DEFB 

48 

0 

4610 

DEFB 

57 

9 

10200 

DEFB 

48 

0 

4825 

DEFB 

57 

9 

10415 

DEFB 

48 

0 

5040 

DEFB 

57 

9 

10630 

DEFB 

34 

11 

5255 

DEFB 

57 

9 

10845 

DEFB 

44 

1 

5470 

DEFB 

34 


11060 

DEFB 

176 

VAL 

5685 

DEFB 

43 

+ 

1 1275 

DEFB 

34 

H 

5900 

DEFB 

107 

k 

11490 

DEFB 

48 

0 

6115 

DEFB 

44 

* 

11705 

DEFB 

34 

II 

6330 

DEFB 

175 

CODE 

11920 

DEFB 

13 

ENTER 


DISPONEMOS DE TAPAS ESPECIALES PARA 
I SUS EJEMPLARES DE 





(cada lapa ea para 6 ejemplares) 


Mospectnm 


SIN NECESDAD DE ENCUADERNACION 

- re c\oÚñídÁd 

h5 0 pk» 


Para hacer su pedido, rellene este cupón HOY MISMO 
y envíelo a; 

TftlIliffUtflIlÉIMill Bravo Murillo, 377 

Ull Tel- 733 96 62 - 28020 MADRID 

— 

Por favor envíenme .. tapas para la encuademación de mis 

ejemplares de TODÜSPECTRUM, al precio de 650 pis más gastos de envío 
El importe lo abonaré 

□ POR CHEQUE ü CONTRA REEMBOLSO □ CON MI TARJETA DE 
CREDITO □ AMERICAN EXPRESS" □ VISA □ IMTERBANK 

Número de mi tarjeta: QITT7 TI IT 111 I L I I I I III I II IJ 

Fecha de caducidad .... Firma 


NOMBRE . 
DIRECCION 
CIUDAD . . . 


L PROVINCIA 


C. P 
































Dirige tus cartas a: 
Todospectrum 
Bravo Murillo, 377, 5.°-A 
28020 Madrid 


LENGUAJE MAQUINA, 
FUNCIONES Y AJEDREZ 


Dada la falta de una sección 
de «Preguntas y respuestas» en 
el suplemento QL MAGAZI- 
NE ha creído conveniente remi¬ 
tir mi carta a la que trata sobre 
cuestiones del Spectrum. Qui¬ 
siera que me respondieran a lo 
si guíente r 

¿Existe alguna publicación 
sobre el lenguaje máquina del 
QL? 

¿Cómo podría introducir des¬ 
de el teclado una función cual¬ 
quiera sin necesidad de cambiar 
una línea del programa? (Esto 
vale también para el Spectrum, 
pues tuve el mismo problema 
con él). 

Tengo el programa de ajedrez 
de PSION y mi problema es 
que cuando al final de la carga 
me pide que inserte el cartucho 
original para iniciar el juego, re¬ 
sulta que no funciona. El micro- 
drive funciona perfectamente, y 
puede asegurar que no he mane¬ 
jado incorrectamente el cartu¬ 
cho, sino sacar copias de seguri¬ 
dad y cargar desde ellas, pero lo 
compré hace 6 meses y temo que 


no conservo la garantía. ¿Mere¬ 
ce la pena ir al establecimiento 
a que me lo cambien o hay algu¬ 
na solución mejor? 

José L. Collado 
Zaragoza 

Debido al poco volumen de 
cartas referentes a QL que lle¬ 
gan a la redacción, no creemos 
que sea necesaria la creación de 
una sección de este tipo en el 
suplemento. Sin embargo, in¬ 
tentaremos contestar desde 
aquí a todas las cartas que lle¬ 
guen a TODOSPECTRUM, se 
refieran a uno o a otro ordena¬ 
dor. 

Sí existe un libro que trata dei 
lenguaje máquina del 68008 en 
el QL. Se trata de Assembly 
Language Programmilng on 
the Sinclair QL de Andrew 
Pennell y ia editorial inglesa 
Sunshine Books, aunque, como 
habrás adivinado por el título, 
está escrito en inglés, y, por lo 
que sabemos, no hay ningún in¬ 
dicio de que vaya a ser traduci¬ 
do al castellano próximamente. 
Aunque menos específico pue¬ 
de serte muy útil QL, Progra¬ 
mación Avanzada de Adrián 
Díckens y la editorial (esta vez 


española) RA-Ma. que comen¬ 
ta más superficialmente las ins¬ 
trucciones del assemble 68008 
pero contiene importantes da¬ 
tos sobre el sistema operativo 
QDOS, mapa de memoria, 
traps, vectores, etc. 

Tanto en el QL como en el 
Spectrum, las funciones defini¬ 
das por el usuario deben estar 
incluidas dentro de los listados 
para que puedan ser ejecutadas. 
Tienes por tanto dos opciones, 
o encontrarles un hueco dentro 
del BASIC o prescindir de ellas. 

En cuanto a tu problema con 
el Chess, se trata sin duda de 
que el cartucho original se ha 
deteriorado por una u otra cau¬ 
sa. Prueba en la tienda donde lo 
adquiriste por si pudieran cam¬ 
biártelo, quizás aún lo consigas. 

U.D.G.s 

DISCRIMINADOS 


Poseo un ZX Spectrum de 
16 K, y me gustaría saber por 
qué no funciona la función 
SCREENS (X, Y) cuando se 
trata de identificar un carácter 
definido por el usuario, en cam¬ 
bio cuando se trata de hacer lo 
mismo con un carácter predefi¬ 
nido por la máquina todo funcio¬ 
na a la perfección. ¿Cómo po¬ 
dría conseguir utilizar esta fun¬ 
ción con caracteres definidos 
por el usuario? 

Ferrán Font 
Badalona 

Suponemos que los señores 
que programaron la ROM del 
Spectrum sabrán los motivos 
que les llevaron a «dejar a me¬ 
dias esta función, incluida 
la errata de salida de la ruti¬ 
na de la ROM SCANNING- 
SCREENS, que, al hacer un 
salto a STACK-STORE-$ en 
lugar de el correspondiente 
RET, produce un almacena- 











miento por duplicado de la ca¬ 
dena resultante. 

Pero, como de nada vale la¬ 
mentarse, aquí tienes una rutí- 
na en código máquina 
(SCRS_G) que te resolverá el 
problema. 

Pokeadas las coordenadas X 
e Y en ORG+1 y ORG+2, la ru¬ 
tina podrá ser llamada a la di¬ 
rección que ocupe (en el listado 
65280). El código del carácter 
que se encuentre en la posición 
señalada quedará en el par BC, 
por lo que puede utilizarse di¬ 
rectamente de la forma que más 
nos convenga, por ejemplo: IF 
USR xxxxx = 144 THEN GOT 
nn (siendo xxxxx la dirección 
donde coloquemos la rutina). Si 
el carácter no es reconocido la 
rutina devolverá un cero. 

Si no dispones de ensambla¬ 
dor ni conocimientos de este 
lenguaje no debes preocuparte, 
puedes teclear el programa car¬ 
gador BASIC, que se encargará 
de !a carga y comprobación de 
las líneas DATA. Caso de que, 
una vez ejecutado, aparezca el 
mensaje «ERROR en DA- 
TAs», deberás revistar los valo¬ 
res de estas líneas y repetir la 
ejecución. Una vez pasado este 
test, y antes de ejecutar el códi¬ 
go máquina, deberás salvar el 
programa en cinta con: 

SAVE “NOMBRE” CODE 
65280,73 

Cuando quieras volver a car¬ 
garlo deberás teclear: 

CLEAR 65279: LOAD 
CODE 

LISTADO 1 

1 C i .. 

20 i SCREEN* 1 x f y) DE UD&s 
30 

40 ¡ENT: BC=CQÜRDEMADAS 
50 ÍSLD; C=CODIQÜ UDG O 0 SI 
60 i NO ENCONTRADO 

7u i ---- 

SO 

90 

100 ÜPG ttPFOO 

110 

120 LD BC,#0000 


130 




140 


LD 

HL,(45C7B 

150 


L D 

A, C 

Í 60 


kkc A 


1 70 


PRCA 


130 


RRCA 


190 


AND 

#eo 

200 


XUR 

E 

210 


LD 


220 


LD 

A, C 

230 


AMD 

#18 

240 


KQR 

440 

250 


LD 

D, A 

2*0 


LD 

B. #15 

270 

&CP*Gl 



230 


PUSH 

BC 

290 


FU5H 

DE 

300 


PUSH 

HL 

310 


LD 

A, í DE i 

320 


XDR 

fHLl 

330 


JR 

Z, SCR*G2 

340 


INC 

A 

350 


JR 

MZ * SCRÍG4 

3e0 


DEC 

A 

370 

SCRS02 



3 SO 


LD 

C, A 

390 


LD 

B,*0? 

400 

SCRS03 



410 


INC 

D 

420 


INC 

HL 

430 


LD 

A, E DÉ 3 

440 


XQR 

(HL J 

450 


XÜF 

C 

460 


JR 

NZ.SCR*G4 

470 


DJNZ 

SCR$G3 

430 


POP 

BC 

490 


POP 

BC 

500 


POP 

BC 

5i 0 


LD 

A, #80 

520 


SUS 

£ 

530 


LD 

BC,#0001 

540 


RST 

#30 

550 


LD 

ÍDF),A 

5ÓU 


JR 

SCRÍG5 

570 

SCRÍG4 



5S0 


POP 

HL 

590 


LD 

DE.#0003 

oQO 


ALD 

HL , DE 

610 


POR 

DE 

620 


POP 

BC 

63o 


DJNZ 

5CF$G í 

640 


LD 

A, #DB 

650 

SCRÍG5 



66 Ü 


ADD 

A ,#25 

*70 


LD 

C, A 

680 


RET 



LISTADO 2 

10 REN cargaaor SCR3_G 


2u cl&hR ¿5279 
30 LE T c=»0 
40 Füft r>=ü T0 '/2 
50 RtAD a 
60 Lfc T E==C+3L 
70 PGKfc 65260+n,a 
SO NÉxT n 

90 PftlNT FLASH íí p ERROR EN DA 
Th “ AND C\>é7 35 
100 

1 LO DATA 1 * O,0,42 í123 
120 DAT A 92 ,121,15,15 
130 DATA 15,230,224,163 
140 .DATA 95 1 121,230,24. 236 
150 DMA 64,37^6.21,197 
160 DATA 213j229,26,174,40 
170 DA IA 4,60,32,26,61 
160 DATA ?9 f &,?,20,3S 
190 DA í A 26,174.169,32,15 
2UG DATA 16,247,192>193,193 
210 DATA 62,123,144.1,1 
220 DATA 0,247,13,24,11 
230 DATA ¿25,17,3,0,25 
240 DATA 209,193*16,211 
250 DATA 219,198,37 1 79,201 


SIN ANIMO 
DE CRITICAR 


Muy Sr. mío: 

Sov asiduo lector de la revista 
TODOSPECTRUM. y habiendo 
visto en el número 16. correspon¬ 
diente a diciembre, el anuncio de 
comercialización del programa 
Starmouse (dibujando con ratón), 
y dado el interés que para mí te¬ 
nía. a través de la firma El Corte 
Inglés de Oviedo, lo pedí. Tardó 
muy pocos días en llegar a esta 
ciudad. Una vez cargado en el 
QL, resultó ser un programa de 
gran utilidad. 

El gran fallo, que es i mperdona¬ 
ble, y que file motivo de la devo¬ 
lución del importe de mi compra, 
después de infinitas gestiones con 
la firma Puricorp de Guadalajara, 
con Investrónica, y con los auto¬ 
res del programa, es que al pare¬ 
cer sólo se puede imprimir lo pre¬ 
sentado en la pantalla con un úni¬ 
co tipo de impresora, cuya marca 
no tengo ningún interés de cono¬ 
cer. Mi impresora es una ADMA- 
TEDP-100. 

Si le parece oportuno puede 
transmitir el contenido de este es¬ 
crito a los lectores de sus presti¬ 
giosa revista, para que nos les 
pase lo que a mí. Y menos mal, 
que en mi caso, la firma comer¬ 
cial El Corte Inglés, dada su sol¬ 
vencia, no puso el menor incon¬ 
veniente en la devolución del im¬ 
porte, y fue ella la que investigó 
en las firmas antes mencionadas 
sobre la incongruencia del caso. 

El problema concreto que apa¬ 
rece con las impresoras «non gra¬ 
tas» es que se saltan un renglón y 
medio, que queda sin entintar. 
Como muestra le adjunto un re¬ 
corte de lo que en pantalla eran 
círculos rellenos de color o trama. 
Con el resto de lineas, rayados, 
etc., trazados con el ratón, ocurre 
exactamente lo mismo, salen en 
franjas con intervalos de renglón 
y medio en blanco. 

Sin otro particular, y rogándole 
sepa disculpar el haberle sustraí¬ 
do parte de su tiempo, quedo suyo 
atímo. 

V. Enrique/ Fernández 
Oviedo 

















□.CORCHO 



***£ T^/Rs2 > m P^ 

n ^or, V <* 

Néctar a lt ¡ al ° hablen 0rd e- 
ef5 3.0nr\ /^PíTCSOi-a en¬ 


vendo calculadora Ca¬ 
sio FX-3600P, programable, 
científica, análisis regresión, 
etcétera. Además regalo jue¬ 
gos actuales. Todo por 7.000 
pesetas negociables. Tam¬ 
bién video juegos Atari por 
10.000 pesetas con ocho car¬ 
tuchos de regalo. Alejandro 
Esteve. Avda. Buijasot, 112 
9.46009 Valencia. Teléfono: 
(96) 349 76 04. Horas comi- 


Se venden programas 

para Spectrum, por cambio 
de ordenador. Escribid a 
Juan Carlos Hernández. Ca¬ 
lle Condado de Treviño, 75, 
6-dcha. Miranda de Ebro 
(Burgos). 
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Mountain 




S|v:rv 

PC/HT 

ENCORE! 
hoja financiera 

h'«íoniB*Ji« 

VTREE 
árbol 
verdad 


¡ATENCION! Con el ejemplar de MARZO 86 

PC MAGAZINE le regala un DISKETTE DEMO 
DE PC-TEXT-PC-BASE. 

(Obsequio de Quinta Generación) 



Además en este número: 

GRAFICOS: 

Hardware y Software para hacer que el 
ordenador personal transforme en imágenes 
sus ideas y cifras, etc. 

Compatible 

SPERRY PC/HT 

Software 

ENCORE! HOJA FINANCIERA 
Programación 

VTREE, UN ARBOL DE VERDAD 



ESTOS TEMAS Y MUCHOS MAS EN EL NUMERO DE MARZO 


¡COMPRELA HOY MISMO! 





































ASI TRABAJA EL QL 
HECHO PAR A NOSOTROS 



$ 


QL QUILL TRATAMIENTO DE TEXTOS, 

QL Quill muestra en pantalla exactamente cómo 
aparecerá su escrito cuando esté impreso. Olvídese de 
pesadas memorizaciones de comandos. Con QL Quill 


tiene siempre todo lo necesario en pantalla. Escriba en 
negrita, corte, una, fije tabuladoras, márgenes, 
sobreescriba... después de todo esto su QL le dirá, 
además, cuántas palabras ha escrito. 



QL ABACUS. HOJA ELECTRONICA 
DE CALCULO 

Este programa ha superado con mucho las tradicionales 
hojas de cálculo de otros ordenadores. Con QL Abacus 
escriba simplemente "costes de personal" , o' personal' , 
o "pers" para encontrar esa celdilla. QL Abacus también 
le ayuda a decidir lo que hay que hacer mediante 
diferentes sugerencias, dentro de una amplia gama de 
posibilidades. Podrá, además, crear hojas electrónicas 
de cálculo con más de 6.000 celdas individuales. 

Podrá mostrar ventanas múltiples, variar la distancia 
entre columnas... 



QL ARCHIVE. BASE DE DATOS 

Organizar su agenda o poner al día su fichero se 
convierte en un trabajo agradable. QL Archive resuelve 
rápidamente su problema con un sistema de archivo 
de gran facilidad de uso. usando un lenguaje aún más 
sencillo que el BASIC. 

Con un mínimo de práctica puede crear desde un 
simple directorio a una extensa base de datos. Podrá 
determinar relaciones, extraer datos, reorganizarlos, 
hacer cálculos estadísticos y contables. 

Con QL Archive podrá crear un formato personalizado 
para sus informes. 



QLEASEL GRAFICOS 

Olvídese de construir tablas de valores o enfrentarse 
con situaciones dudosas antes de ver algún resultado. 
Con QL EASEL podrá desde el principio crear gráficos. 
Inmediatamente creará diagramas de barras, filas, líneas 
rellenas, sectores, barras sobrepuestas... 

Todo ello simplemente pulsando una tecla. 

Introduzca textos donde quiera. Dentro o cerca de su 
diagrama. Más aún, mueva el texto por la pantalla para 
ver dónde queda mejor... en el color que prefiera. 


investronica 


Tomas Brelón 60 TeU (91) 467 82 LO Telen 233S& JYCO E 26045 Msdrtd 
Camp 80 Te!f [93) 211 26 59-211 27 54 09022 Barcelona 


















